ich möchte per Makro über das Dialogfenster "Datei = Application.GetOpenFilename...."
eine oder mehrere Dateien auswählen und nur die Dateinamen mit Dateiendung (z.B. Mustermann.PDF) in aktiven Tabellenblatt in Spalte A ab Zeile 19 eingefügen.
Dateitypen als Auswahl:
- Alle Dateien *.*
- PDF-Dateien *.PDF
- XLS-Dateine *.XLS
Falls in A19 ein Eintrag steht, dann MsgBox "Sollen die vorhandene Einträge gelöscht werden?"
Wenn JA, dann Bereich A19 bis A200 löschen und die neue Einträge ab Zelle A19 nach unten eintragen.
Wenn NEIN, dann in nächste freie Zelle nach A19 fortfahren.
Danke im Voraus.....
Liebe Grüße
SELMA