Access-o-Mania

Access-Forum (Deutsch/German) => Access Programmierung => Thema gestartet von: cyberchris am Juli 12, 2011, 09:08:36

Titel: Word.dot nur speichern unter
Beitrag von: cyberchris am Juli 12, 2011, 09:08:36
Hallo ihr lieben,

ich habe mal wieder ein kleines Problemchen.

Eine Wordvolrage lasse ich per VBA öffnen. Der User soll dann Drucken, Bearbeiten und Speichern unter können.
Jedoch nicht die .dot überspeichern.

Wenn man über den Windows Explorer eine dot-Datei öffnet, lässt sich diese nur als Doc mit speichern unter speichern.
Wie kann ich das per VBA realisieren?

Hier mein bisheriger Code.

Dim objWord As Word.Application
    Set objWord = CreateObject("Word.Application")
    With objWord
        .Visible = True
        .Documents.Open (dok1)
        .ActiveDocument.FormFields("Vorrichtungsnummer").result = IdentNr.Value
        .ActiveDocument.FormFields("Bezeichnung").result = d1
        .ActiveDocument.FormFields("Zeichnung").result = d2
        .ActiveDocument.FormFields("Index").result = d3
        .ActiveDocument.FormFields("BestellPA").result = d4
        .ActiveDocument.FormFields("Kostenstelle").result = d5
        .ActiveDocument.FormFields("Personal").result = persnr
        '.ActiveDocument.FormFields("Prüfer").result = Name
    End With
'    objWord.ActiveDocument.PrintOut 'ausdrucken
'    objWord.ActiveDocument.Close SaveChanges:=wdDoNotSaveChanges
'    objWord.Quit`


Vielen Dank
Christoph
Titel: Re: Word.dot nur speichern unter
Beitrag von: DF6GL am Juli 12, 2011, 09:46:47
Hallo,

warum ÖFFNEST und bearbeitest Du die Dot-Datei?


Erzeuge ein NEUES Word-Doc auf Grundlage der Dot-Datei   (   .Documents.Add ("Vorlage.dot")  )  und bearbeite das neue DOC...


Wenn im Windows-Explorer auf eine Dot-Datei doppelt geklickt wird, wird auch ein NEUES DOC erzeugt. Nur wenn Du im Kontextmenu "öffnen" wählst, wird die Dot-Datei in Word geladen.

Titel: Re: Word.dot nur speichern unter
Beitrag von: cyberchris am Juli 12, 2011, 12:17:50
Vielen Dank!