speichern unter...
14.07.2003 16:24:37
Tobi
saveas_filename = Application.GetSaveAsFilename _
(initialFilename:="O:\Personal\2003\" & _
Range("A1").Value, fileFilter:="mydata(*.xls),*.xls")
über diesen Code lasse ich meine Datei in o:\personal\2003\ speichern. Diese habe ich jetzt manuell in den Code eingegeben. Geht das auch das die Daten in den Zellen B1 - B5 hinterlegt sind? B1 steht dann also "personal" und in B2 "2003". Danke für Eure Hilfe. Schönen Tag noch
Tobi