OVH Cloud OVH Cloud

Numéro de la page courante en VBA

3 réponses
Avatar
Jac Tremblay
Bonjour,

Je voudrais savoir s'il est possible de conna=EEtre le=20
num=E9ro de la page courante d'un document Word de fa=E7on =E0=20
pouvoir d=E9tecter le changement de page apr=E8s l'insertion=20
d'un paragraphe.

L'aide de Word n'est pas tr=E8s utile dans ce cas. Tous ce=20
que j'ai trouv=E9 ressemble =E0 ceci (peu pertinent).

' ********************************************************
Sub Num=E9roDePage()
' MsgBox "Le num=E9ro de page est : "
Dim objPage As Page

Set objPage =3D ActiveDocument.ActiveWindow.Panes(1).Pages
(1)
intPages =3D objPage.Count

'Add new line to document
ActiveDocument.Shapes.AddLine _
InchesToPoints(0.5), _
InchesToPoints(0.5), _
objPage.Width - InchesToPoints(0.5), _
objPage.Height - InchesToPoints(0.5)
End Sub
' ********************************************************
Merci de votre aide

3 réponses

Avatar
Geo
Bonsoir Jac Tremblay,


Bonjour,

Je voudrais savoir s'il est possible de connaître le
numéro de la page courante d'un document Word de façon à
pouvoir détecter le changement de page après l'insertion
d'un paragraphe.


Voir la faq de la webmistress marina
(où il y en plein d'autres bonnes choses aussi)
http://faq.ms.word.free.fr/VBA/VBA_rep.htm#v27
Pour être honnête, je n'ai pas compris mais je fais confiance aux
spécialistes.


--
A+

Avatar
Jac Tremblay
Bonsoir à vous,

J'ai trouvé votre information très pertinente et
informative. C'est vrai qu'il y a des tonnes de bonnes
choses sur ce site. C'est très utile et j'ai résolu mon
problème sans problèmes.

Merci infiniment.

Jac Tremblay


-----Message d'origine-----
Bonsoir Jac Tremblay,


Bonjour,

Je voudrais savoir s'il est possible de connaître le
numéro de la page courante d'un document Word de façon
à


pouvoir détecter le changement de page après
l'insertion


d'un paragraphe.


Voir la faq de la webmistress marina
(où il y en plein d'autres bonnes choses aussi)
http://faq.ms.word.free.fr/VBA/VBA_rep.htm#v27
Pour être honnête, je n'ai pas compris mais je fais
confiance aux

spécialistes.


--
A+


.




Avatar
Geo
Bonsoir Jac ,


C'est très utile et j'ai résolu mon
problème sans problèmes.


Que demander de mieux ?

merci pour ce retour
--

A+