Word-Makro: Unter vorgegebenem Pfad speichern
Gibt es ein Makro für Word mit dem ich den Dialog «Speichern unter» mit einem vorgegebenen Pfad öffnen kann?
Das Makro sieht fast genau gleich aus wie jenes in Excel [1].
---------------------------------
MAKRO ZUM KOPIEREN
---------------------------------
Sub SpeichernUnter()
Dim dialog As Object
Dim pfad As String
Dim datei As String
pfad = "C:\__EigeneDateien\testpfadNterordner\"
Set dialog = Application.FileDialog(msoFileDialogSaveAs)
With dialog
.InitialFileName = pfad
.Show
End With
If dialog <> False Then dialog.Execute
End Sub
---------------------------------
Auch in Word setzen Sie das im VB-Editor erzeugte Makro per Extras/Anpassen in eine Symbolleiste oder ein Menü.
Laden Sie die PCtipp-App kostenlos auf Ihr Smartphone und bleiben Sie auf dem Laufenden.
![]()
Windows 7
Windows 2000
Windows XP
Windows Vista
Linux
Mac
Sicherheit
Internet
Office
Multimedia
Spiele
Hardware
Windows9x/NT
Mobile
Sonstiges
![]()


