#ordnername

Ordnernamen eines Verzeichnisses in Zellen schreiben — VBA Excel Tipps & Tricks

Mit diesem Code, werden die Namen der Ordner in Spalte A geschrieben und der Pfad des Ordners in Spalte B. Auch Unterordner werden berücksichtigt. Private Sub PrintFolders() Dim objFSO As Object Dim objFolder As Object Dim objSubFolder As Object Dim i As Integer ‚Create an instance of the FileSystemObject Set objFSO = CreateObject(„Scripting.FileSystemObject“) ‚Get the […]Ordnernamen eines…