Word: macro qui modifie hors-sélection
Résolu
Armulis
Messages postés
1236
Date d'inscription
Statut
Membre
Dernière intervention
-
Armulis Messages postés 1236 Date d'inscription Statut Membre Dernière intervention -
Armulis Messages postés 1236 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
J'ai écrit une macro pour modifier une partie de mon texte que j'aurais préalablement sélectionnée, mais la macro agit sur la sélection et sur tout ce qui apparaît après. Elle ne touche pas le début du document.
J'aimerais que ma macro ne modifie que ce que j'ai sélectionné.
Je vous la mets ici, en exemple:
Sub Codage01()
'
' Codage01 Macro
' Macro enregistrée le 16/02/2012 par Michael Baracco
'
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = "Albert"
.Replacement.Text = "Alfred"
.Forward = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = "Jean-Luc"
.Replacement.Text = "Jean-Pierre"
.Forward = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub
C'est une macro toute simple pour remplacer des éléments de mon texte.
J'aimerais aussi que la macro puisse faire la différence entre les majuscules et les minuscules. Savez-vous comment on fait ça?
J'ai écrit une macro pour modifier une partie de mon texte que j'aurais préalablement sélectionnée, mais la macro agit sur la sélection et sur tout ce qui apparaît après. Elle ne touche pas le début du document.
J'aimerais que ma macro ne modifie que ce que j'ai sélectionné.
Je vous la mets ici, en exemple:
Sub Codage01()
'
' Codage01 Macro
' Macro enregistrée le 16/02/2012 par Michael Baracco
'
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = "Albert"
.Replacement.Text = "Alfred"
.Forward = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = "Jean-Luc"
.Replacement.Text = "Jean-Pierre"
.Forward = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub
C'est une macro toute simple pour remplacer des éléments de mon texte.
J'aimerais aussi que la macro puisse faire la différence entre les majuscules et les minuscules. Savez-vous comment on fait ça?
A voir également:
- Word: macro qui modifie hors-sélection
- Word 2013 - Télécharger - Traitement de texte
- Tableau word - Guide
- Espace insécable word - Guide
- Word et excel gratuit - Guide
- Supprimer une page word - Guide