Guiten Tag,
ich habe eine excel-Datei aus der Daten in ein word dokument eingetragen werden sollen.
Das word Dokument (ist an dem angegebenen Pfad) öffnet nicht, er zeigt einen Fehler in der Zeile an, bei der das erste bookmark eingefügt werden soll.
Weiß jemand warum das so ist?
___
Sub Pruefung()
'Excel aktivieren
Dim wordapp As New Word.Application
Dim doc As Word.Document
'Word sichtbar machen
wordapp.Visible = True
'Word Datei öffnen
Set doc = wordapp.Documents.Open("\\xy.docx")
'Word mit excel-Daten füllen
doc.Bookmarks("Datum_Antrag_Prüfung").Range.Text = Tabelle1.Cells(2, 28).Value
doc.Bookmarks("Datum_Prüfung_gesamt").Range.Text = Tabelle1.Cells(2, 27).Value
___
Liebe Grüße
Matthias
|