Pane.Selection (Word)

Retorna o objeto Selection que representa uma seleção ou o ponto de inserção dentro de um painel do documento. Somente leitura.

Dim slcSelection As Selection
Set slcSelection = ActiveWindow.ActivePane.Selection