Avatar billede tville Juniormester
25. oktober 2022 - 15:31 Der er 10 kommentarer

Kontrol af om en fil i en mappe er åben

Hej
Jeg har en makro, der henter info fra alle regneark i en bestemt mappe. Men hvis blot en af filerne i mappen er åben giver det problemer. Hvordan kan jeg kontrollere, om der er en fil åben? I stifinderen kan jeg se, at når en fil er åben figurer den i dimmet tilstand med "~" foran. Og det er jo nok den fil makroen forsøger at læse og giver fejl på.
Avatar billede martens Guru
26. oktober 2022 - 06:29 #1
Hvad med lidt vba-kode, der kontrollerer om filen den/mappe/hvor/filen/er/placeret/~min_excelfil_001.xlsx eksisterer

....... //////....

Sub CheckFileExists ()

Dim strFileName As String
Dim strFileExists As String

    strFileName = "C:\lokation\~the_file.xlsx"
    strFileExists = Dir(strFileName)

  If strFileExists = "" Then
        MsgBox "The selected file doesn't exist"
    Else
        MsgBox "The selected file exists"
    End If

End Sub

...////////....

Giv det et skud...
Avatar billede tville Juniormester
26. oktober 2022 - 08:24 #2
Skal strFileName være lig navnet på filen?
Avatar billede martens Guru
26. oktober 2022 - 10:42 #3
# ja det skal den !
Avatar billede store-morten Ekspert
26. oktober 2022 - 18:54 #4
"Kontrol af om en fil i en mappe er åben?"

Prøv:
Sub Test_om_filen_er_åben()
    Dim TestWorkbook As Workbook

    Set TestWorkbook = Nothing
    On Error Resume Next
    Set TestWorkbook = Workbooks("Mappe1.xlsm")
    On Error GoTo 0

    If TestWorkbook Is Nothing Then
        MsgBox "Filen: " & TestWorkbook.Name & " er ikke åben!"
    Else
        MsgBox "Filen: " & TestWorkbook.Name & " er åben!"
    End If

End Sub
Avatar billede tville Juniormester
27. oktober 2022 - 10:49 #5
Der er jo ikke kun tale om een fil. Antallet af filerne i mappen varierer og det gør navnene også.
Avatar billede store-morten Ekspert
27. oktober 2022 - 11:03 #6
Ja, så du skal sammen skrive koden, med den der henter info 🙂

Hvis Mappe1 ikke er åben, hent info fra Mappe1, næste
Hvis Mappe2 ikke er åben,  hent info fra Mappe2..... osv.
Avatar billede tville Juniormester
28. oktober 2022 - 08:10 #7
Mit problem her er, at der hele tiden kommer nye filer til. Og så vil jeg jo skulle tilrette koden hver gang der tilføjes en fil i mappen. Er der ikke en metode til at kontrollere om der er en fil fra en mappe åben?
Avatar billede store-morten Ekspert
28. oktober 2022 - 08:24 #8
Er det dig eller anden bruger der kan have filen åben?

Må vi se koden der henter info?
Avatar billede tville Juniormester
30. oktober 2022 - 15:52 #9
Det kan både være mig eller en anden.
Avatar billede store-morten Ekspert
30. oktober 2022 - 16:41 #10
Jeg ved ikke om #4 kan se når en anden bruger har filen åben.

Må vi se koden der henter info?
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
Vi har et stort udvalg af Excel kurser. Find lige det kursus der passer dig lige her.

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.

Du kan også logge ind via nedenstående tjenester