Faire une marque tous les xxx mots
Fermé
<mpm>
-
Modifié par le 17/01/2016 à 15:19
m@rina Messages postés 20188 Date d'inscription mardi 12 juin 2007 Statut Contributeur Dernière intervention 10 mai 2024 - 17 janv. 2016 à 19:17
m@rina Messages postés 20188 Date d'inscription mardi 12 juin 2007 Statut Contributeur Dernière intervention 10 mai 2024 - 17 janv. 2016 à 19:17
A voir également:
- Waptrick com xxx
- Waptrick java football - Télécharger - Jeux vidéo
- Xnxx. com ✓ - Forum Google Chrome
- Waptrick jeux java itel - Forum Jeux vidéo
- Waptrick xxx - Télécharger - Divers TV & Vidéo
- Telecharger des jeux dans la carte memoire - Forum Jeux vidéo
1 réponse
m@rina
Messages postés
20188
Date d'inscription
mardi 12 juin 2007
Statut
Contributeur
Dernière intervention
10 mai 2024
11 279
17 janv. 2016 à 19:17
17 janv. 2016 à 19:17
Bonjour,
Plutôt que d'ajouter un caractère après chaque 200e mot, ce qui risque quand même d'être gênant, voici une macro qui surligne en jaune tout ce qui dépasse les 200 mots.
m@rina
Plutôt que d'ajouter un caractère après chaque 200e mot, ce qui risque quand même d'être gênant, voici une macro qui surligne en jaune tout ce qui dépasse les 200 mots.
Sub jaune()
'macro écrite par m@rina
Dim para As Paragraph, trop As String
For Each para In ActiveDocument.Paragraphs
If para.Range.Words.Count > 200 Then
para.Range.Words(200).Select
trop = Selection.EndOf(Unit:=wdParagraph, Extend:=wdExtend)
Selection.Range.HighlightColorIndex = wdYellow
End If
Next
End Sub
m@rina