Supportnet / Forum / Tabellenkalkulation
Abspeichern Excel Datei mit Makro
Frage
Hallo Zusammen.
Folgendes Problem stellt sich mir:
Ich möchte gerne mit Hilfe eines Makros eine Excel Datei unter einem bestimmte Namen speichern, wobei sich der Dateinamme zum einen aus einem "Buchstabennamen" und einer 12 stelligen Zahl zusammensetzt. Diese Daten des Dateinamens sind im Excelblatt enthalten und "steht" immer auf den selben Feldern.
Ich will nun, dass das Makro eien Automatische Speicherung durchführt, wobei "es" sich den Namen & die Zahl aus den Feldern "zieht" und als Dateinamen verwendet.
Ist sowas möglich?
Vielen Dank an Alle!
Gruß
Antwort 1 von DukeNT
Hi excel,
angenommen der Dateiname unter dem gespeichert werden soll steht in Zelle A1 auf Blatt1
Kopiere folgenden Code in ein Modul:
Sub speichern()
Pfad = "c:\Test\"
Name = Sheets(1).Cells(1, 1)
Endung = ".xls"
ActiveWorkbook.SaveAs Pfad & Name & Endung
End Sub
Den Speicherpfad mußt du noch anpassen.
Gruß Niels
angenommen der Dateiname unter dem gespeichert werden soll steht in Zelle A1 auf Blatt1
Kopiere folgenden Code in ein Modul:
Sub speichern()
Pfad = "c:\Test\"
Name = Sheets(1).Cells(1, 1)
Endung = ".xls"
ActiveWorkbook.SaveAs Pfad & Name & Endung
End Sub
Den Speicherpfad mußt du noch anpassen.
Gruß Niels

