user_mobilelogo

Pour tout connaître sur Word
Nouvelle version !

600 pages !

9,80 € 

En savoir plus.

Public Sub test()
Dim NbPages As Integer
ActiveDocument.Bookmarks("\endofdoc").Select
NbPages = Selection.Information(wdActiveEndPageNumber)
End Sub

Statistiques

Aujourd'hui2341
Hier2564
Cette semaine4905
Ce mois49956
Total depuis 200413608442

15
visiteurs actuellement en ligne

25 janvier 2022