Range.Collapse (Word)

Recolhe um intervalo ou uma seleção para a posição inicial ou final. Após o recolhimento de um intervalo ou uma seleção, os pontos inicial e final ficam iguais.

Se você usar wdCollapseEnd para recolher um intervalo que se refere a um parágrafo inteiro, o intervalo estará localizado após a marca de parágrafo final (o início do próximo parágrafo). No entanto, você pode mover o intervalo de volta um caractere usando o método MoveEnd após o intervalo ser recolhido, conforme mostrado no exemplo a seguir.

Collapse (Direction)

Direction: A direção na qual recolher o intervalo ou seleção. Pode ser uma das seguintes constantes WdCollapseDirection : wdCollapseEnd ou wdCollapseStart. O valor padrão é wdCollapseStart.

Set myRange = ActiveDocument.Paragraphs(1).Range 
myRange.Collapse Direction:=wdCollapseEnd 
myRange.MoveEnd Unit:=wdCharacter, Count:=-1