Speichern unter Dialog in Word aufrufen inkl. Pfad
11.07.2008 14:50:00
Elisa
Ich habe jetzt lange im Archiv gesucht, aber nichts passendes gefunden. Ich hoffe ihr könnt mir helfen.
Ich öffne aus Excel eine Worddatei, fülle diese via Textmarken aus, und möchte nun dass der Speichern Unter Dialog im Word geöffnet wird mit einem vorgegeben Pfad und Dateiname.
Geht das?
*********************
Private Sub XY_Click()
Dim datei As String
Dim dok As Object
Dim wd As Object
datei = "DokumentenpfadUndName"
Set wd = CreateObject("Word.Application")
wd.Visible = True
Set dok = wd.Documents.Add(datei)
dok.FormFields("BLA").Range.Text = Worksheets("BLAListe").Range("BLA").Value
--> Hier fehlt: In Word Speichern unter Dialog aufrufen mit Pfad "AAA" und Dateiname "BBB"
End Sub
*********************
Vielen Dank für die Hilfe.
Grüsse
Elisa