nach langer Zeit mal wieder eine Frage von mir.
Für ein aktuelles Projekt, bei dem ich die Bilder eines Verzeichnisses (z.B. nur Jpg oder BMP) einlese und in einer Listbox einer Userform darstelle, möchte ich parallel in einer zweien Listbox das dazugehörige Dateidatum anzeigen.
Für eine Datei klappt das schon gut, leider aber nicht für die Darstellung aller in einem Verzeichnis befindlichen Daten des gleichen Typs. Das Verzeichnis soll der User vorher selbst auswählen können.
Was ich bisher habe, leider nur für eine Datei:
Sub test2()
'Für Änderungsdatum
Dim LResult As Date
LResult = Format(FileDateTime("C:\Users\Bremke\Desktop\JEX\jex.bmp"), "dd.mm.yy")
Load UserForm1
With UserForm1
.ListBox2.AddItem (LResult)
.Show
End With
End Sub
Ich hoffe, Ihr könnt mir helfen!Lb. Gruß Till