Ich möchte eine Arbeitsmappe mit der Namenseingabe über eine InputBox z.B. in Laufwerk G:\Dok speichern.
Danke für eine eventuelle Hilfe bzw. Lösung
Josef
Josef
Müsste so in etwa funktionieren
Pfad = "G:\Dok\" &Inputbox.... &".xls"
activeworkbook.saveas Pfad
ciao Hendrik
Josef
Josef
Das ist aber eigenartig, habe es bei mir probiert und keine Fehlermeldung erhalten und Datei wurde vernünftig abgespeichert.
Pfad = "C:\" & InputBox(Pfad) & ".xls"
ActiveWorkbook.SaveAs (Pfad)
warum über Inputbox?
Nimm entweder:
GetSaveAsFilename
GetOpenFilename
Das sieht eleganter aus, Du kannst es per Maus bedienen und es können keine Fehler entstehen. Bedenke, Du musst bei der Input-Box alle Fehler abfangen!
Gruß
Micha
Josef
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen