Gruppe
Datei
Problem
Wie kann ich Pfad und Namen aller geöffneten Excel-Arbeitsmappe in einer Tabelle auflisten?
StandardModule: basMain
Sub DateienListen()
Dim wkb As Workbook
Dim iRow As Integer
For Each wkb In Workbooks
iRow = iRow + 1
Cells(iRow, 1).Value = wkb.Path
Cells(iRow, 2).Value = wkb.Name
Next wkb
End Sub