Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- oDoc.Paragraphs.Add() '17
- iStartIndex = oDoc.Paragraphs.Count
- oDoc.Paragraphs.Last.Range.Text = strUmfang
- iEndIndex = oDoc.Paragraphs.Count
- oDoc.Range( Start := oDoc.Paragraphs(iStartIndex).Range.Start, End :=
- oDoc.Paragraphs.Last.Range.End ).Select()
- Selection.Range.ListFormat.ApplyBulletDefault
- Selection.Style = ListGalleries.Item(3).ListTemplates(1).ListLevels(1).LinkedStyle
Add Comment
Please, Sign In to add comment