Viewing and selecting are far too much.

Use something like ...

ActiveDocument.Sections(1).Headers(1).Range.Tables(1).etc....