Hallo,
mit dem nachstehenden Code erhalte ich eine Dateiliste vom Desktop, mit dem Datei-Datum.
Sub DateilisteMitVerknüpfungsziel()
Dim strFileName$, strFolder$, lngRow&, objArr As Object, vArr(1 To 1, 1 To 2)
strFolder = "C:\Users\...\Desktop\"
Set objArr = CreateObject("scripting.dictionary")
Application.ScreenUpdating = False
Columns(1).Clear
Columns(2).Clear
strFileName = Dir$(strFolder)
Do Until strFileName = vbNullString
lngRow = lngRow + 1
vArr(1, 1) = strFileName
vArr(1...