GetFolder(pathspec) (Hilfe-Beispiel)
ing.grohn
folgende Prozedur aus dem Excel Hilfebereich läuft nicht bei mir:
Sub DisplayLevelDepth(pathspec)
Dim f, n
Set f = fs.GetFolder(pathspec)
If f.IsRootFolder Then
MsgBox "The specified folder is the root folder."
Else
Do Until f.IsRootFolder
Set f = f.ParentFolder
n = n + 1
Loop
MsgBox "The specified folder is nested " & n & " levels deep."
End If
End Sub
Laufzeitfehler 424 Objekt erforderlichwas hier falsch läuft?
Aufgerufen habe ich die Prozedur mit: DisplayLevelDepth ("\eigene Dateien\")
Wer sagt mir
Mit freundlichen Grüßen
Albrecht