ich habe wieder einmal eine Frage.
Wie kann ich eine Datei in einer Kompination aus dem Inhalt einer Tabellenzelle und einem noch freien Text (ich denke über Inputbox)
abspeichern.
Gruß
Gisela
Public Sub speichern_zelle()
Dim x$, y$
y = InputBox("Bitte Namen eingeben", "Titel")
x = [a1].Value
ActiveWorkbook.SaveAs "c:\eigene Dateien\" & x & y & ".xls"
ActiveWorkbook.Close
End Sub