Mise en forme partielle en recherchant des termes

Anthonymctm · 18 Juin 2019

Bonjour,

J'ai besoin d'aide sur Excel 2016 dernière version.

Après avoir cherché partout sur le net sans rien trouver, je m'en remet à votre expertise

Explication (sur la base du fichier joint) : De la cellule A1 à la cellule A120, j'ai des cellules qui sont complétées par des formules puis copiées- collées en texte par une macro.

Je me retrouve finalement avec du texte aléatoire dans plusieurs cellules et parfois, dans ce texte, je vais retrouvé la dénomination d'un produit (ProduitAlpha). Je souhaite marqué cette dénomination en modifiant la police (une partie en bleu, une partie en orange, le tout en gras).

Tous les moyens seront bons pour moi du moment que je n'ai pas a modifier manuellement à chaque fois que Produit alpha apparaît.
Ca peut être une macro à lancer, une macro passive, ou une formule à copier coller. Je sais pas, je suis perdu. C'est pour ça que je fais appel à vous ^^

Hasco · 18 Juin 2019

Re bonjour,

Tiens, j'ai fait quelque chose comme ça hier pour un autre naute : https://www.excel-downloads.com/threads/fonction-replace.20032873/

A plus

Anthonymctm · 18 Juin 2019

Re bonjour,

J'ai regardé ton fichier, mais je suis incapable de l'adapter à mon besoin

Anthonymctm · 21 Juin 2019

Petit up, ça paraissait assez simple pourtant

Hasco · 21 Juin 2019

Bonjour,

Je suppose que votre fichier final ne ressemble pas à celui communiqué en post #1.
Votre exemple ne dis pas s'il y aura d'autre termes que "ProduitAlpha" à chercher/colorer, ni comment, s'il y en a d'autres, définir la partie en bleu et celle en orange.

A vous relire

mapomme · 23 Juin 2019

Bonjour @Anthonymctm, @Roblochon ,

Un essai dans le fichier joint. Le bouton "Hop!" est associé à la macro TEST (module de la feuille Feuil1) :

VB:

Sub TEST()
  Chercher_Colorier_plage_liste Range("a1:a7"), Range("f2:f5")
End Sub

Chercher_Colorier_plage_liste est une procédure avec deux arguments en entrée :

le premier argument (xrgTxt) est la plage où rechercher les valeurs à mettre en forme (la plage peut être réduite à une seule cellule)
le second argument (xrgQuoi) est la plage des textes à rechercher (la plage peut être réduite à une seule cellule)
la procédure colore les textes trouvés en appliquant la mise en forme des textes à rechercher (caractère par caractère). Par mise en forme, on entend la graisse et la couleur
le code de la procédure (et des procédures appelées) sont dans module1

Anthonymctm · 24 Juin 2019

Roblochon à dit:
Bonjour,

Je suppose que votre fichier final ne ressemble pas à celui communiqué en post #1.
Votre exemple ne dis pas s'il y aura d'autre termes que "ProduitAlpha" à chercher/colorer, ni comment, s'il y en a d'autres, définir la partie en bleu et celle en orange.

A vous relire

Bonjour Roblochon,

Merci pour votre réponse et en effet, j'ai manqué de précision !
Pour l'instant je n'ai qu'un seul terme à chercher mais pour avoir un solution durable on pourrait prévoir une liste comme pour votre premier fichier.
Pour répondre à la question "comment définir la partie bleu et celle orange", je ne sais pas trop on pourrait imaginer avec une liste dans un colonne en bleu, une autre en orange.. J'avoue que je ne sais pas ^^'

Hasco · 24 Juin 2019

Bonjour,

Anthonymctm à dit:
on pourrait imaginer avec une liste dans un colonne en bleu, une autre en orange..

Je verrai plutôt une colonne de termes à rechercher et dans leur cellule voisine, le nombre de caractère à colorer en bleu, le reste étant en orange, ou s'il s'agit de termes complexes (ex: un oiseau chanteur), dans la cellule voisine, mettre les mots à colorer en bleu ('un oiseau')

Bonne réflexion

Anthonymctm · 24 Juin 2019

mapomme à dit:
Bonjour @Anthonymctm, @Roblochon ,

Un essai dans le fichier joint. Le bouton "Hop!" est associé à la macro TEST (module de la feuille Feuil1) :

VB:

Sub TEST() Chercher_Colorier_plage_liste Range("a1:a7"), Range("f2:f5") End Sub

Chercher_Colorier_plage_liste est une procédure avec deux arguments en entrée :

le premier argument (xrgTxt) est la plage où rechercher les valeurs à mettre en forme (la plage peut être réduite à une seule cellule)

le second argument (xrgQuoi) est la plage des textes à rechercher (la plage peut être réduite à une seule cellule)

la procédure colore les textes trouvés en appliquant la mise en forme des textes à rechercher (caractère par caractère). Par mise en forme, on entend la graisse et la couleur

le code de la procédure (et des procédures appelées) sont dans module1

Salut Mapomme,

Ecoute je crois que c'est parfait ce que tu m'as fait là (même mieux que ce que je m'imaginais ) !
Je vais essayé d'adapter ça à mon cas réel et de l'ajouter à une autre macro qui initialise mes données et je reviens vers toi si je rencontre un soucis.

Merci !

Anthonymctm · 24 Juin 2019

Roblochon à dit:
Bonjour,

Je verrai plutôt une colonne de termes à rechercher et dans leur cellule voisine, le nombre de caractère à colorer en bleu, le reste étant en orange, ou s'il s'agit de termes complexes (ex: un oiseau chanteur), dans la cellule voisine, mettre les mots à colorer en bleu ('un oiseau')

Bonne réflexion

Tu vois quelque chose de génant avec la solution de Mapomme ?

Hasco · 24 Juin 2019

Re,

Ben non, c'est une excellente solution également, c'est à vous de savoir ce que vous voulez faire et comment
J'ai plus l'impression que votre projet n'est pas pour le moment bien déterminé.
Il y aura toujours un moment où il faudra faire des choix.
Cordialement

Anthonymctm · 26 Juin 2019

Bonjour,

Je reviens sur ce sujet pour vous demandez si selon vous il serait possible que la mise en forme s'applique également aux textes issus de formules ?
Sinon ça fonctionne très bien, pour du texte brut.

Anthonymctm · 1 Juillet 2020

mapomme à dit:
Bonjour @Anthonymctm, @Roblochon ,

Un essai dans le fichier joint. Le bouton "Hop!" est associé à la macro TEST (module de la feuille Feuil1) :

VB:

Sub TEST() Chercher_Colorier_plage_liste Range("a1:a7"), Range("f2:f5") End Sub

Chercher_Colorier_plage_liste est une procédure avec deux arguments en entrée :

le premier argument (xrgTxt) est la plage où rechercher les valeurs à mettre en forme (la plage peut être réduite à une seule cellule)

le second argument (xrgQuoi) est la plage des textes à rechercher (la plage peut être réduite à une seule cellule)

la procédure colore les textes trouvés en appliquant la mise en forme des textes à rechercher (caractère par caractère). Par mise en forme, on entend la graisse et la couleur

le code de la procédure (et des procédures appelées) sont dans module1

Bonjour Mapomme, Je réouvre ce sujet parce qu'à l'utilisation les macros Chercher_Colorier sont super longues (plusieurs minutes).
J'ai réouvert un topic spécial pour ça, mais comme ça concerne spécialement ce topic là, je me dit que ça peut être bien de le spécifier ici

Grace au forum j'ai pu adapter tes macros pour qu'elle se répète suivant un "pas" régulier (défini en P2)

Mise en forme partielle en recherchant des termes

Anthonymctm

XLDnaute Occasionnel

Pièces jointes

Hasco

XLDnaute Barbatruc

Anthonymctm

XLDnaute Occasionnel

Anthonymctm

XLDnaute Occasionnel

Hasco

XLDnaute Barbatruc

mapomme

XLDnaute Barbatruc

Pièces jointes

Anthonymctm

XLDnaute Occasionnel

Hasco

XLDnaute Barbatruc

Anthonymctm

XLDnaute Occasionnel

Anthonymctm

XLDnaute Occasionnel

Hasco

XLDnaute Barbatruc

Anthonymctm

XLDnaute Occasionnel

Anthonymctm

XLDnaute Occasionnel

Pièces jointes

Discussions similaires