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

cs_gouyette Messages postés 13 Date d'inscription mercredi 13 mai 2009 Statut Membre Dernière intervention 1 mars 2010 - 14 févr. 2010 à 17:12
cs_gouyette Messages postés 13 Date d'inscription mercredi 13 mai 2009 Statut Membre Dernière intervention 1 mars 2010 - 15 févr. 2010 à 12:24
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

cs_gouyette Messages postés 13 Date d'inscription mercredi 13 mai 2009 Statut Membre Dernière intervention 1 mars 2010
15 févr. 2010 à 12:24
helppppppppppppppppppp
0