Ich füge aus meinem Programm (VB 6.0)Daten (Überschriften.Tabellen usw) über ein Range- Objekt in ein Word- Dokument ein:
Set word = CreateObject("Word.Application")
word.Visible = True
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
und möchte anschliessend einen Seitenumbruch einfügen. Laut Anleitung sollte das wie folgt aussehen:
Para1.range.InsertBreak type:=wdpagebreak
Klappt aber alles nicht.
Laut MS Knowledgebase sollten z.B. auch bestimmte Deklarationen erfolgen, die ich weglassen musste, da er die Datentypen als unbekannt betrachtet. Erst wenn ich die Deklarationen weglasse, funktioniert es.
'Dim Word As Word.Application
'Dim Doc As Word.Document
'Dim Table As Word.Table
'Dim Para1 As Word.Paragraph, oPara2 As Word.Paragraph
'Dim Para3 As Word.Paragraph, oPara4 As Word.Paragraph
'Dim Rng As Word.Range
'Dim Shape As Word.InlineShape
Wie bekomme ich also diesen Seitenumbruch zustande?
nebenbei:
Wie kann ich den Text (Paragraph) in die Bildschirmmitte bewegen?
Wie kann ich in einer Tabelle nur bestimmte Felder BOLD setzen oder nicht?
Set word = CreateObject("Word.Application")
word.Visible = True
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
und möchte anschliessend einen Seitenumbruch einfügen. Laut Anleitung sollte das wie folgt aussehen:
Para1.range.InsertBreak type:=wdpagebreak
Klappt aber alles nicht.
Laut MS Knowledgebase sollten z.B. auch bestimmte Deklarationen erfolgen, die ich weglassen musste, da er die Datentypen als unbekannt betrachtet. Erst wenn ich die Deklarationen weglasse, funktioniert es.
'Dim Word As Word.Application
'Dim Doc As Word.Document
'Dim Table As Word.Table
'Dim Para1 As Word.Paragraph, oPara2 As Word.Paragraph
'Dim Para3 As Word.Paragraph, oPara4 As Word.Paragraph
'Dim Rng As Word.Range
'Dim Shape As Word.InlineShape
Wie bekomme ich also diesen Seitenumbruch zustande?
nebenbei:
Wie kann ich den Text (Paragraph) in die Bildschirmmitte bewegen?
Wie kann ich in einer Tabelle nur bestimmte Felder BOLD setzen oder nicht?