Selection.SelectCurrentTabs (Word)

Extends the selection forward until a paragraph with different tab stops is encountered.

Set myRange = ActiveDocument.Paragraphs(2).Range 
myRange.Select 
Selection.SelectCurrentTabs