Utiliser la méthode GoTo, par exemple pour atteindre la page 6 :
Sub allera()
Selection.GoTo What:=wdGoToPage, Which:=wdGoToAbsolute, Count:=6
End Sub
Utiliser la méthode GoTo, par exemple pour atteindre la page 6 :
Sub allera()
Selection.GoTo What:=wdGoToPage, Which:=wdGoToAbsolute, Count:=6
End Sub