ich würde gerne damit sämtliche Dateien gleich gefunden werden, für das Abspeichern einen bestimmten Zellwert jeweils als Speichername verwenden.
Dafür habe ich bereits folgendes gemacht.
Sub speicher_default()
Dim filnam As String
filnam = .Range("P1")
End With
Application.Dialogs(xlDialogSaveWorkbook).Show filnam
End Sub
Leider funktioniert das aber nicht. Es ist so, dass ich eben möchte, dass jeweils die Projektnummer (in Zelle P1) als Speichername automatisch vorgeschlagen wird. Es soll aber kein Speicherort automatisch vorgeschlagen werden, da das File jeweils an unterschiedlichen Computern verwendet wird.
Geht das irgendwie?
lg Patricia