Avec le code :

 

Selection.Information (wdActiveEndPageNumber)