Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Arbeitsmappen-History erstellen

Gruppe

Zeit

Problem

Wie kann ich Pfad und Namen aller geöffneten Excel-Arbeitsmappe in einer Tabelle auflisten?

Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.

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