ACC02: VBA Wordaufruf mit Dokumentvorlage klappt nicht

18/03/2008 - 20:38 von Toni Strnad | Report spam
Hallo Ihr Lieben!

In meiner Access 2002-Anwendung wird ein Dokument auf Basis einer
Dokumentvorlage erstellt.
Der unten folgende Code làuft astrein mit Word 2002 Version 10.2627.2625.

Die exakt gleiche Anwendung làuft auf einem 2. Rechner. Auf dem ist allerdings
Word 2002 Version 10.6838.6839 SP 3 installiert.

Auf diesem 2. Rechner wird der Fehler

"Laufzeitfehler '91'
Objektvariable oder With-Blockvariable nicht festgelegt." gemeldet.

Es wird nicht einmal ein leeres Dokument erstellt!

Code:
'……..
Dim objWord As New Word.Application
Dim docWord As Object
Dim TemplateFile As String

Set objWord = CreateObject("Word.Application")

TemplateFile = "w:\silke\verwaltung\as-tanzschule\word-vorlagen\LVL-VK-01"

Set docWord = objWord.Documents.Add(TemplateFile, , , True)

docWord.Variables.Add Name:="Anrede", Value:=TAnrede  Hier
kommt der Fehler
docWord.Variables.Add Name:="Vorname", Value:=Me!Vorname
docWord.Variables.Add Name:="Name", Value:=Me!KName

docWord.Fields.Update
'...

Ich habe das ganze Internet abgesucht, finde aber keine Erklàrung.

Ich weiss, dass ich sehr làstig bin, aber was soll ich den machen?

Herzlichen Dank im voraus für jede Hilfe!

Schöne Grüsse aus Erkelenz
Toni
 

Lesen sie die antworten

#1 André Minhorst
19/03/2008 - 08:54 | Warnen spam
Hi Toni,

Toni Strnad schrieb:
In meiner Access 2002-Anwendung wird ein Dokument auf Basis einer
Dokumentvorlage erstellt.
Der unten folgende Code làuft astrein mit Word 2002 Version 10.2627.2625.

Die exakt gleiche Anwendung làuft auf einem 2. Rechner. Auf dem ist allerdings
Word 2002 Version 10.6838.6839 SP 3 installiert.

Auf diesem 2. Rechner wird der Fehler

"Laufzeitfehler '91'
Objektvariable oder With-Blockvariable nicht festgelegt." gemeldet.

Es wird nicht einmal ein leeres Dokument erstellt!

Code:
'……..
Dim objWord As New Word.Application
Dim docWord As Object
Dim TemplateFile As String

Set objWord = CreateObject("Word.Application")

TemplateFile = "w:\silke\verwaltung\as-tanzschule\word-vorlagen\LVL-VK-01"

Set docWord = objWord.Documents.Add(TemplateFile, , , True)

docWord.Variables.Add Name:="Anrede", Value:=TAnrede  Hier
kommt der Fehler
docWord.Variables.Add Name:="Vorname", Value:=Me!Vorname
docWord.Variables.Add Name:="Name", Value:=Me!KName

docWord.Fields.Update
'...



in welcher Zeile tritt der Fehler auf?
Liegt es vielleicht an der fehlenden Dateiendung der Vorlage?

Ciao
André

http://www.access-entwicklerbuch.de
http://www.access-im-unternehmen.de

Ähnliche fragen