Søg
Avatar billede tville Juniormester
05. februar 2007 - 08:55 Der er 5 kommentarer og
1 løsning

Kontrol af om fil allerede er åben

I en makro åbner jeg et andet regneark - en skabelon. Den navngives automatisk til "faktura1". Hvis man kører makroen igen navngives den næste fil "faktura2". For at undgå at man kommer til at kører makroen flere gange, vil jeg kontrollere om filen "faktura1" allerede er åben. Og hvis den er, vil jeg gerne give brugeren en meddelelse om at den anden fil skal gemmes og lukkes først. Hvordan gør man det?

Tville
Avatar billede kabbak Professor
05. februar 2007 - 14:28 #1
vis lige koden
Avatar billede tville Juniormester
05. februar 2007 - 15:29 #2
Koden ser således ud:
    Workbooks.Add Template:= _
        "C:\Documents and Settings\tvj.LAN\Application Data\Microsoft\Skabeloner\faktura.xlt"
    Windows("adresser.xls").Activate

Jeg åbner skabelonen "Faktura". Da det er en skabelon navngives den automatisk af excel til "Faktura1".
Avatar billede kabbak Professor
05. februar 2007 - 15:55 #3
prøv denne

Public Sub HentFaktura()
For Each Wb In Workbooks
If Left(ActiveWorkbook.Name, 7) = "faktura" Then
MsgBox " du har indlæst en faktura, gem og luk den først"
Exit Sub
End If
Next
Workbooks.Add Template:= _
        "C:\Documents and Settings\tvj.LAN\Application Data\Microsoft\Skabeloner\faktura.xlt"
    Windows("adresser.xls").Activate

End Sub
Avatar billede kabbak Professor
05. februar 2007 - 15:56 #4
rettelse

Public Sub HentFaktura()
For Each Wb In Workbooks
If Left(Wb.Name, 7) = "faktura" Then
MsgBox " du har indlæst en faktura, gem og luk den først"
Exit Sub
End If
Next
Workbooks.Add Template:= _
        "C:\Documents and Settings\tvj.LAN\Application Data\Microsoft\Skabeloner\faktura.xlt"
    Windows("adresser.xls").Activate

End Sub
Avatar billede tville Juniormester
06. februar 2007 - 08:44 #5
Det virker bare - tak for hjælpen.
Send et svar, så får du point.
Tville
Avatar billede kabbak Professor
06. februar 2007 - 09:10 #6
et svar ;-))
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Excel kurser
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig
Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel Indlæg Oprettet Seneste aktivitet
problem med mailbesked Af Pestilensen i Excel 2 24/08/202611:16 I dag 07:43
Sætte billeder ind i google sheets ark ud fra elev nummer Af lurup i Excel 16 17/08/202615:14 I dag 01:20
Gemme største værdi Af Lemming@privat.dk i Excel 2 07/08/202622:13 08/08/202609:03
Forskel mellem klokkeslet start aften slut næste morgen Af krasmussen i Excel 13 24/07/202611:08 03/08/202618:42
Opdatering af celler i excel ark Af lurup i Excel 2 09/06/202619:40 10/06/202614:34
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I går 13:28 Findes der en brugsanvisning til : "ONKYO Stereo Casette - Tape Deck - R1" Af Ikke-ekspert i Musik & videoafspillere
24/0820:07 Libra Office 26.2.5.2 - Er sort - Kan an ændre til lysere baggrund ? (Windows 11) Af Ikke-ekspert i Office & Kontorpakker
24/0811:24 Hvor kan jeg finde hjælp til at flytte fra min gamle Samsung Flip4 til min nye Samsung Galaxy S24 Af vbr i Apps til Android
24/0811:16 problem med mailbesked Af Pestilensen i Excel
24/0810:45 Powerbank Af postpeter@outlook.dk i Fri debat
White papers
Flere white papers »