HalloHabe schon ein VBS Script mit dem ich in einer Schleife mehrere CSV Dateien (die als Listentrennzeichen Komma haben) aus einem Folder öffne und dann aus diesen Daten in eine andere Excel kopiere.
Nun habe ich den Bedarf für einen zweiten Anwendungsfall das gleich zu tun, nur ist nun das Listentrennzeichen ein Semikolon.
Der Versuch über Suchmaschine eine Lösung zu finden hat mich bisher nicht zum Ziel geführt
Hoffe sehr, dass mir in diesem Forum jemand die Lösung geben kann
Hier der Quellcode Block aus meinem Script, zum CSV öffnen:
diese Variablen in Zeile 5 "verz&file2(a1-1)" stehen für das Verzeichnis und Dateiname der zu öffnenden CSV.
Gruß
Script_Andi
Nun habe ich den Bedarf für einen zweiten Anwendungsfall das gleich zu tun, nur ist nun das Listentrennzeichen ein Semikolon.
Der Versuch über Suchmaschine eine Lösung zu finden hat mich bisher nicht zum Ziel geführt
Hoffe sehr, dass mir in diesem Forum jemand die Lösung geben kann
Hier der Quellcode Block aus meinem Script, zum CSV öffnen:
Visual Basic-Quellcode
- Set XL=CreateObject("Excel.Application")'Excel starten, ist aber noch nicht zu sehen
- Set XLobj=CreateObject("Excel.Application")'Excel starten, ist aber noch nicht zu sehen
- For a1=1 To file_anz
- 'msgbox file2(a1-1)
- XL.Workbooks.open verz&file2(a1-1),1 'CSV öffnen
- XL.Visible = True 'Excel sichtbar machen
diese Variablen in Zeile 5 "verz&file2(a1-1)" stehen für das Verzeichnis und Dateiname der zu öffnenden CSV.
Gruß
Script_Andi