Public Sub test()
Dim NbPages As Integer
ActiveDocument.Bookmarks("\endofdoc").Select
NbPages = Selection.Information(wdActiveEndPageNumber)
End Sub
- Vous êtes ici :
-
Accueil
-
Word
- Environnement
Comment, en VBA, compter le nombre de pages d'un document?
- Détails
- Catégorie parente: Word
- Catégorie : Environnement
- Affichages : 27718