Bonjour =E0 tous,
Je souhaite faire la boucle suivante :
Tant que le paragraphe est en Titre 1 alors action.
Comment connaitre le style d'un paragraphe ?
Merci d'avance pour vos r=E9ponses.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Geo
Bonjour à tous, Je souhaite faire la boucle suivante : Tant que le paragraphe est en Titre 1 alors action. Comment connaitre le style d'un paragraphe ? Merci d'avance pour vos réponses.
MonParagraphe.style
-- A+
Bonjour à tous,
Je souhaite faire la boucle suivante :
Tant que le paragraphe est en Titre 1 alors action.
Comment connaitre le style d'un paragraphe ?
Merci d'avance pour vos réponses.
Bonjour à tous, Je souhaite faire la boucle suivante : Tant que le paragraphe est en Titre 1 alors action. Comment connaitre le style d'un paragraphe ? Merci d'avance pour vos réponses.
MonParagraphe.style
-- A+
nuit6
MonParagraphe ? C'est une variable ? Si oui, comment ça fonctionne ? Merci !
MonParagraphe ? C'est une variable ? Si oui, comment ça fonctionne ?
Merci !
Bonsoir : Peut-être un truc de ce genre : Sub style() Dim MonParagraphe As Paragraph For Each MonParagraphe In ActiveDocument.Paragraphs If MonParagraphe.style = ("Titre 1") Then MsgBox "OK" Next End Sub
a écrit dans le message de news:
Et comment faire pour un seul paragraphe ?
Bonsoir :
Peut-être un truc de ce genre :
Sub style()
Dim MonParagraphe As Paragraph
For Each MonParagraphe In ActiveDocument.Paragraphs
If MonParagraphe.style = ("Titre 1") Then MsgBox "OK"
Next
End Sub
<nuit6@romandie.com> a écrit dans le message de news:
1161281402.267672.121440@e3g2000cwe.googlegroups.com...
Bonsoir : Peut-être un truc de ce genre : Sub style() Dim MonParagraphe As Paragraph For Each MonParagraphe In ActiveDocument.Paragraphs If MonParagraphe.style = ("Titre 1") Then MsgBox "OK" Next End Sub
