[Déplacé VB6 --> VBA] Find and Replace dans WORD

Signaler
Messages postés
13
Date d'inscription
mercredi 13 mai 2009
Statut
Membre
Dernière intervention
1 mars 2010
-
Messages postés
13
Date d'inscription
mercredi 13 mai 2009
Statut
Membre
Dernière intervention
1 mars 2010
-
Bonjour
je fait un : Find and Replace d'Excel dans Word,
pas de probleme.
je veux simplement que le texte du 'replace'
soit cadré a gauche et avec "Courier New" et size 8.
j'y arrive pas. ci dessous mon code :

With myRange.Find
.ClearFormatting
.Text = "TAB" & NumOpt
With .Replacement
.ClearFormatting
.Text = strClip
End With

.Execute Replace:=wdReplaceAll, _
Format:=True, MatchWholeWord:=True
End With

si qq 'un peux m'aider?
merci d'avance
jc

1 réponse

Messages postés
13
Date d'inscription
mercredi 13 mai 2009
Statut
Membre
Dernière intervention
1 mars 2010

helppppppppppppppppppp