Range.Information (Word)

Retorna informações sobre o intervalo especificado. Somente leitura .

Information (Type)

Type: O tipo da informação.

If ActiveDocument.Words(10).Information(wdWithInTable) Then _ 
 ActiveDocument.Words(10).Tables(1).Select