Åben en bestemt mappe fra en excel-fil

Prøv at se: http://www.eksperten.dk/spm/961132

Prøv at smide denne funktion på en knap i dit Excel ark, og skift
stFolder = "c:\Mappe" ud med stien til din mappe.


Sub Open_Mappe()
    Dim stFolder As String
   
    stFolder = "c:\Mappe"
   
    If Len(Dir(stFolder, vbDirectory)) <> 0 Then
        Shell "Explorer.exe /n,/e," & stFolder, vbNormalFocus
    Else
        MsgBox "Mappen kunne ikke findes.", vbCritical
    End If
   
End Sub

Hej Panen

Jeg har skiftet stien ud med den til min egen mappe og det virker lige efter hensigten. Super godt.

Mange tak for hjælpen.

Sender du et svar ?

Laugesen

Hej supertekst

Jeg har fået det til at fungere med en vba kode fra Panen.
Men tak for dit input.


Laugesen

Super! :)

Fint nok.. ..