Forum |  HardWare.fr | News | Articles | PC | Prix | S'identifier | S'inscrire | Aide | Shop Recherche
1956 connectés 

  FORUM HardWare.fr
  Windows & Software
  Logiciels

  Word Macro Recherche-Remplace : surligner les modifications effectuées

 


Sujet(s) à lire :
 

 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Word Macro Recherche-Remplace : surligner les modifications effectuées

n°3367716
jeromef3
Posté le 24-03-2020 à 09:19:19  profilanswer
 

Bonjour à tous,
 
je débute, besoin de quelques lignes de codes, un peu d'aide me serait précieuse
 
Dans Word vba, Une fois lancé une macro Rechercher-Remplacer, le texte se trouve modifié.  
Comment obtenir le surlignage des zones modifiées ?
 
Par exemple sur le texte   "...malades   ? Les soignants'..." la macro supprime des espaces inutiles
Une fois la moulinette passée, j'aimerais voir qqchz de ce genre
 
...Malades? Les soignants...   ou le 'gras souligné' serait plutôt simplement 'surligné'
 
J'imagine un truc comme :
 
Rechercher::
Elargir la recherche à 5 caractères quelconques avant et après le critère
Remplacer :
surligner les 5 caractères avant et après la zone modifiée  
____________
 
exemple
 
Sub G_Espace_Insecable_et_Ponctuation()
'Macro qui gère la ponctuation (espaces insecable, espace avant le :, le ?, le !, etc.)
Clear_ChercherRemplacer
On Error GoTo Fin
Selection.HomeKey Unit:=wdStory
'Espace insécable dans les format de nombre de 1 000 et plus
With Selection.Find
.Text = "(<[0-9]{2}) ([0-9]{3})"
.Replacement.Text = "\1^s\2"

.Forward = True
.MatchWildcards = True
.Wrap = wdFindContinue
End With
Selection.Find.Execute Replace:=wdReplaceAll
etc.


Message édité par jeromef3 le 24-03-2020 à 11:46:17
mood
Publicité
Posté le 24-03-2020 à 09:19:19  profilanswer
 

n°3367798
jeromef3
Posté le 24-03-2020 à 20:30:26  profilanswer
 

concernnt la couleur de police appliquée à un résultat de d=recherche, je ne trouve quasi rien. En français, un qui dit qu'on peut le faire. mais peut il le faire ? Oui ! oui, il peut le faire.
 
En ressources, je ne vois pas de FontColor dans les ressources Microsoft
 
https://docs.microsoft.com/en-us/of [...] fectFormat

n°3367808
jeromef3
Posté le 25-03-2020 à 08:16:11  profilanswer
 

il faudrait placer ceci en remplacement,  
 
    Options.DefaultHighlightColorIndex = wdYellow
    Selection.Range.HighlightColorIndex = wdYellow
 


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Windows & Software
  Logiciels

  Word Macro Recherche-Remplace : surligner les modifications effectuées

 

Sujets relatifs
Recherche logiciel pour Installation et désinstallation à distancerecherche logiciel pour monter Google Drive depuis l'explorateur
Recherche un bon VPN gratuitRecherche logiciel de capture vidéo avec programmation
Aide recherche avec notepad++ [OK]Recherche outil de partage et communication
Paramétrages de recherche dans un dossier[résolu] Démarrer : barre de recherche : résultat vide grise
Est-ce qu'on peut remettre l'ancienne recherche ? :(Recherche outil plannification simple et gratuit
Plus de sujets relatifs à : Word Macro Recherche-Remplace : surligner les modifications effectuées


Copyright © 1997-2018 Hardware.fr SARL (Signaler un contenu illicite) / Groupe LDLC / Shop HFR