Speichern mit Rückfrage
25.02.2004 13:28:45
TinoB
habe wieder mal ein problem. dieses untenstehende makro speichert die datei mit der bezeichnung aus zelle Z15. soweit funktioniert dies auch. nun gibt es aber keine rückfrage wohin genau gespeichert werden soll. weiß jemand wo ich da was einbauen muß, damit dieses "speichern unter" erscheint?
Danke im Voraus
Tino
Sub PitSpeichern()
Dim sFile As String, sPath As String
sPath = Application.DefaultFilePath & "/"
sFile = Range("Z15").Value
ActiveWorkbook.SaveAs sPath & sFile
End Sub