Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

résoudre un problème

2 réponses
Avatar
Mario
comment remplacer et effacer les tabulations dans Word

2 réponses

Avatar
heureux-oli
Salut


Essaie ce code :


**********************************
Sub Macro1()
'
' Macro1 Macro
'
'
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = "^t"
.Replacement.Text = "bonjour"
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub
*****************************************

--
Heureux-oli
Si rien n'est mentionné pour le code, c'est que j'en suis l'auteur.
http://heureuxoli.developpez.com/
http://word.developpez.com/

----------------------------------------------------------------------------------

"Mario" a écrit dans le message de news:

comment remplacer et effacer les tabulations dans Word


Avatar
Geo
Bonjour

.Replacement.Text = "bonjour"



amha il manque les espaces avant et après bonjour !

--
A+