Hallo zusammen,
ich habe folgendes Script mit welchem ich *eine* Datei auswähle und in Zelle L3 wiedergibt.
Jetzt möchte ich, dass wenn ich mehrere Dateien auswähle (was schon funktioniert), diese untereinander von Zeile L3 bis L(x) wiedergegeben werden.
Public Sub Anhang_auswählen()
Dim Files As Variant
Files = Application.GetOpenFilename("All Files (*.*), *.*", MultiSelect:=True)
Worksheets("Daten").Range("L3").Value = Files
Exit Sub
End Sub
Vielen Dank schonmal!!!
Grüße |