Populating data in Headers as well as the body of the document.

[Choclatdawg]

Hi

I am working on an XP workstation using Microsoft Office 2003.

I am running a VB Module and front end form ( I use the form to collect data such as name and number). I use bookmarks in my word document to place the collected data on the Word documents where the bookmarks are located. This process works fine. I have recently been tasked to combine 15 documents, with varying pages, into one document. Some of these document collect the data from the header and some collect the data from the body of the document. I have been able to combine all of the documents together and maintain the formatting of each. My problem is that need a way to replace the collected data in both the body or the header. Please find below an example of the code I am using to place data on the document. If more information is needed please let me know.

With ActiveDocument
.Bookmarks("name").Range.Text = namevar
.Bookmarks("number").Range.Text = idvar
.Bookmarks("DOB").Range.Text = Adatevar
End With
Selection.Find.Execute Replace:=wdReplaceAll
ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument
frmInputData.Hide
' End If ' Ends the Test for blank fields
' Go to the end of the Document and prepare for note entry
Selection.GoTo What:=wdGoToLine, Which:=wdGoToNext, Name:=1
End Sub

[si_the_geek]

Thread moved to Office Development/VBA forum (note that the "VB Editor" in Office programs is actually VBA rather than VB)