Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema Userform
BildScreenshot zu Userform Userform-Seite mit Beispielarbeitsmappe aufrufen

Buchhaltung

Betrifft: Buchhaltung von: Michael
Geschrieben am: 16.10.2020 11:37:34

Hallo Leute,

Danke für die Hilfe vom Letzten mal, hat richtig gut geklappt und war richtig froh drum, aber ich steh wieder an. :-(
Wie kann ich die ganzen Ordner in der Listbox öffnen, und zum Schluss die verschiedenen Excel dateien aufmachen sodass
sie mir in der Listbox angezeigt werden und diese in der Userform mit der Eingabe füllen.
Ich checks grad gar nid.
Hab alles in der zip gepackt.
Mfg Michael

https://www.herber.de/bbs/user/140911.zip

Betrifft: AW: Buchhaltung
von: Yal
Geschrieben am: 16.10.2020 17:17:53

Hallo Michael,

verwende die bereit exisiterende Funktionen.
In dem Fall FileDialog
Public Sub Dateien_auswählen()
Dim FD As FileDialog
Dim D As String

    Set FD = Application.FileDialog(msoFileDialogFilePicker)
    FD.AllowMultiSelect = True
    FD.InitialFileName = "C:\Users\micha\OneDrive\Desktop\Projekt Buchhaltung\"
    If FD.Show Then
        For Each D In FD.SelectedItems
            Debug.Print D
        Next D
    End If
End Sub
Viel Erfolg
Yal

Betrifft: AW: Buchhaltung
von: Michael
Geschrieben am: 16.10.2020 19:10:27

Hallo Yal danke für die Hilfe,
aber jetz gehen die Dateien auf, aber die Excel dateien sehe ich noch nicht.

lg

https://www.herber.de/bbs/user/140917.xlsm

Betrifft: AW: Buchhaltung
von: Michael
Geschrieben am: 16.10.2020 19:13:50

Hallo Yal danke für die Hilfe,
aber jetz gehen die Dateien auf, aber die Excel dateien sehe ich noch nicht.

lg

https://www.herber.de/bbs/user/140917.xlsm