Gruppe
Datei
Problem
Der Speicherndialog soll aufgerufen und der in Zelle B1 genannte Dateiname vorgeschlagen werden.
StandardModule: Modul1
Sub Speichern()
Application.SendKeys Range("B1").Value
Application.Dialogs(xlDialogSaveAs).Show
End Sub