Hi I have the following code that is run after prodcuing a dynamic
document.
After running this, the documment is left with the cursor in the header
. Is there a simple command I can add to just put the focus back into
the main document - anywhere will do!.

Thanks in advance.
hals_left

Sub addHeader(strText)
   ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
   Selection.ParagraphFormat.Alignment = wdAlignParagraphLeft
   Selection.TypeText Text:= strText & "         Page: "
   Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty,
Text:= _
       "PAGE  \* Arabic ", PreserveFormatting:=True
   Selection.TypeText Text:=" of "
   Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty,
Text:= _
       "NUMPAGES   \* Arabic ", PreserveFormatting:=True
End Sub