ich habe ein Problem! Und zwar, ich möchte von Excel aus Daten in Word kopieren! Wenn mein Makro startet, dann wird eine bestimmte Word-Datei geöffnet und Daten sollen reingeschrieben werden! Bis dato klappt alles einwandfrei!
Jetzt mein Problem:
Wenn Word geöffnet wird erscheint ein Automakro, welches mir die Kopfzeile automatisch ausfüllt! Wenn ich dort auf "OK" gehe, funktioniert es, wenn ich auf "Abbrechen" gehe kommt Laufzeitfehler 91: Objektvariable oder With-Blockvariable nicht festgelegt!
Mein Makro:
Sub Prüfbericht_aktivieren()
Dim oWord As Word.Application
Dim oDoc As Document
Dim i As Integer
Dim iRow As Integer
Dim iSize As Integer
Dim sFile As String
Set oWord = CreateObject("Word.Application")
oWord.Visible = True
sFile = "C:\Prüfbericht.Doc"
Set oDoc = oWord.Documents.Open(sFile)
If oDoc = "Nothing" Then --> Laufzeitfehler 91
GoTo ende
Else
-- Kopierfunktion --
ende:
Im Lokalfenster zeigt er mir für
oDoc = Nothing
oWord = Nothing
Kann mir bei diesem Problem vielleicht jemand helfen!?
Danke! Gruss Chris