Macro sous Word
Résolu/Fermé
A voir également:
- Macro sous Word
- Macro word - Guide
- Supprimer une page word - Guide
- Espace insécable word - Guide
- Organigramme word - Guide
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
2 réponses
m@rina
Messages postés
20978
Date d'inscription
mardi 12 juin 2007
Statut
Contributeur
Dernière intervention
30 septembre 2024
11 330
11 oct. 2018 à 02:50
11 oct. 2018 à 02:50
Bonjour,
Essaie plutôt ça :
Les enregistrements de macro, c'est pas terrible. C'est pratique pour aider.
Cela étant, en principe, une macro enregistre correctement le format pour un RR ainsi que l'utilisation des caractères génériques.
m@rina
Essaie plutôt ça :
Sub RR()
Dim mondoc
Set mondoc = ActiveDocument.Content
mondoc.Find.ClearFormatting
mondoc.Find.Replacement.ClearFormatting
mondoc.Find.Replacement.Font.Bold = True
With mondoc.Find
.Text = "M*."
.Replacement.Text = "^&"
.Forward = True
.Wrap = wdFindContinue
.Format = True
.MatchWildcards = True
.Execute Replace:=wdReplaceAll
End With
End Sub
Les enregistrements de macro, c'est pas terrible. C'est pratique pour aider.
Cela étant, en principe, une macro enregistre correctement le format pour un RR ainsi que l'utilisation des caractères génériques.
m@rina