`
How can I print a watermark in the middle of a word document then
return to the top of the doc and start to print whatever text I want to?
Here's my code:
Set oWord = CreateObject("Word.Application")
oWord.Visible = True
'Add a new, blank document
Set oDoc = oWord.Documents.Add
oDoc.PageSetup.Orientation = wdOrientLandscape
'Insert watermark somewhere in the middle of the page
then return to the top of the page and continue with code below?
'---------------------------------------------------------------------------
v1$ = StudentFirstLast$
picGradeReportName.Print v1$
Bmp$ = picGradeReportName.Picture
SavePicture picGradeReportName.Image, Bmp$
v1$ = App.Path & "\" + Bmp$
ActiveDocument.Shapes.AddPicture _
Filename:=v1$, Left:=0, Top:=0, SaveWithDocument:=True
'--------------------------------------------------------------------
Set oRange = Nothing
w$ = "Math " & TextBookCode$ + " Chapter " + CStr(CHAPter)
oWord.ActiveDocument.SaveAs App.Path & "\" + w$
Inline Code Example Here
`