Office: (Office 2007) [VBA] Word-Vorlage (.dot) über Excel öffnen

moruk123 · 20. September 2009

Hi,

ich öffne derzeit eine Word Vorlage durch Excel mit folgendem Code:

Code:

Private Sub CommandButton_B2_Click()
Dim AppWD As Object
Set AppWD = CreateObject("Word.Application")
AppWD.Visible = True
AppWD.documents.Open "C:\...\Briefvorlagen\BriefStandard.dotx"
End Sub
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

das klappt auch super! Aber er öffnet die Datei nicht als Vorlage, sondern als normale Datei, d.h. wenn ich etwas ändere und auf speichern klicke, dann überschreibt er mir meine Word-Vorlage.
Was mache ich also falsch?!

Gruß
Moruk

:)

jinx · 23. September 2009

Moin, Moruk,

Open öffnet die Vorlage (und widerspricht meiner Meinung nach dem eigentlichen Sinn einer einer Vorlage), wohingegen Add ein Dokument auf Basis desr Vorlage öffnen sollte.

von Word2000 VBA-Hilfe

Add-Methode (Documents-Auflistung)

Fügt der Auflistung der geöffneten Dokumente ein neues, leeres Dokument hinzu.

Syntax

Ausdruck.Add(Template, NewTemplate, DocumentType, Visible)

Ausdruck Erforderlich. Ein Ausdruck, der ein Documents-Objekt zurückgibt.

Template Variant optional. Der Name der Vorlage, die für das neue Dokument verwendet werden soll. Lässt man dieses Argument weg, wird die Vorlage Normal verwendet.

NewTemplate Variant optional. True, wenn das Dokument als Vorlage geöffnet werden soll. Der Standardwert ist False.

DocumentType Variant optional. Kann eine der folgenden WdNewDocumentType-Konstanten sein: wdNewBlankDocument, wdNewEmailMessage, wdNewFrameset oder wdNewWebPage. Die Standardkonstante ist wdNewBlankDocument.

Visible Variant optional. True, um das Dokument in einem sichtbaren Fenster zu öffnen. Wenn dieser Wert auf False gesetzt wird, öffnet Microsoft Word das Dokument, setzt aber die Visible-Eigenschaft des Dokumentfensters auf False. Der Standardwert ist True.
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

In Deinem Code würde ich mal

Code:

AppWD.documents.Add "C:\...\Briefvorlagen\BriefStandard.dotx"
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

versuchen.

moruk123 · 29. September 2009

super! klappt einwandfrei danke!

Office: (Office 2007) [VBA] Word-Vorlage (.dot) über Excel öffnen

[VBA] Word-Vorlage (.dot) über Excel öffnen

[VBA] Word-Vorlage (.dot) über Excel öffnen

[VBA] Word-Vorlage (.dot) über Excel öffnen - Similar Threads - VBA Word Vorlage

VBA: Platzhalter ersetzen und evtl. leere Zeile einfügen

offene Word-Datei per VBA speichern

Excel Range als Bild in Word einfügen

Word Access VBA Fußzeile formatieren

Bereich zweimal in Word einfügen (VBA)

Array aus Excel Tabelle einlesen Word VBA

Nach Wörtern in Textmarke suchen und Zeilen formatieren