Newbie question.

Code is:
Sub EnterTranscriptPages()
While ActiveDocument.Bookmarks.Exists("TranscriptPage") = True
Selection.Find.Execute
Selection.NextField.Select
Selection.Fields.Update
Wend
End Sub

Problem is I need to see the field so I can read the paragraphs around the field so I can know what info to enter into the update box.

Now it runs the code, shows me each input box, but doesn't change the screen from the starting point.