Code for changing word from portrait to landscape

[lucas]

Here's one way:

[VBA]dim path as string
Dim wb As Excel.Workbook
dim docword as object
Set wb = ActiveWorkbook
Path = wb.Path & "\pushmerge.dot"

Set docWord = pappWord.Documents.Add(Path)
docWord.Bookmarks("bookmark").Range.Text = your range here[/VBA]