| Forum: Visual Basic |
Thema:
Re: ___Seitenumbruch in Word Dokument einfügen |
Von:
G. Guest (
20.08.2003 18:07) |
Die Antwort kommt zwar etwas spät, aber ich hoffe sie hilft Dir trotzdem noch.
Da Du LateBinding (CreateObject) benutzt, vermute ich mal, dass Du keinen Verweis auf Word in deinem VB-Projekt hast. Dann kannst du natürlich auch nicht die Variablen vom Typ Word.Irgendwas deklarieren, sondern Du musst dann alle Variablen vom Typ Object machen.
Die Zeile Paragraph.add kann auch nicht gehen, weil Du zwar Word geöffnet hast, aber noch kein Dokument offen hast.
So sollte es gehen:
Dim word as Object
Dim Para1 As Object
Dim Doc As Object
'Word starten
Set word = CreateObject("Word.Application")
word.Visible = True
'neues Dokument erzeugen
Set Doc = word.documents.Add
Set Para1 = Doc.Content.Paragraphs.Add
Para1.range.Text = "Test" & variable
Para1.range.Font.Bold = True
Para1.range.Font.Size = 12
Para1.Format.SpaceAfter = 6
Para1.range.InsertParagraphAfter
'Seitenumbruch einfügen
Para1.range.InsertBreak Type:=1
Gruß
Elke
Antworten
Vorsicht bei der Eingabe: Die Zeichen ' oder -- sind nicht erlaubt!
