Mettre un mot en couleur

julie_sem · 19 Mars 2019

bonjour à tous,

je sais que beaucoup de poste on déjà été fait à ce sujet mais je n'ai pas encore trouvé mon bonheur.

J'ai un classeur contenant plusieurs feuilles de calcul qui me serve à établir des menus . Afin de ne pas avoir à gérer des modifications visuel trop importantes, s j'ai créer un menu "matrice" dans un des onglet où j'ai fait des report de cellules via des formules afin d'aller copier le contenu de la cellule d'un autre onglet .

Voilà j'ai besoin de mettre certains mot en couleur. ex: bio en vert , maison en gras , LR en rouge etc... dans l'onglet "matrice".

je n'y connais absolument rien en VBA et j'avoue que je rame beaucoup.

j'espère avoir été claire. Je vous remercie par avance de votre aide.
Ju

mapomme · 19 Mars 2019

Bonjour @julie_sem et bienvenue sur XLD

Dans votre précédent message, il manque le fichier exemple joint (anonymisé) pour vous proposer une piste...

A plus...

BOISGONTIER · 19 Mars 2019

Bonjour,

VB:

Sub essai()
  mot = "test"
  For Each c In Range("A2:A" & [A65000].End(xlUp).Row)
   p = InStr(UCase(c), UCase(mot))
   If p > 0 Then c.Characters(Start:=p, Length:=Len(mot)).Font.Color = vbRed
  Next c
End Sub

Fonctions sur les chaînes(vba)

Boisgontier

mapomme · 19 Mars 2019

Bonjour @julie_sem, @BOISGONTIER ,

Un exemple, malgré tout, de ce qu'on pourrait faire:

on ne colore que les mots isolés (séparés des autres par un espace)
on ne tient pas compte de la casse
on colore les doublons
on examine toutes les feuilles du classeur
le code est dans le Module1
cliquez dur le bouton Hop!

julie_sem · 20 Mars 2019

mapomme à dit:
Bonjour @julie_sem et bienvenue sur XLD

Dans votre précédent message, il manque le fichier exemple joint (anonymisé) pour vous proposer une piste...

A plus...

Bonjour,
Merci beaucoup pour votre réponse.
Je n'ai pas l'habitude de ce forum je vous ai joint le fichier Excel concerné. La macro doit s'établir sur l'onglet "Menu repas parents" - c'est la trame avec les formules qui me permet de faire un report de l'onglet menu élémentaire qui lui ne doit absolument pas être modifié.
Je ne sais pas si je suis très claire désolé.
En tout cas je vous remercie pour votre aide.

mapomme · 20 Mars 2019

Bonjour @julie_sem,

Comme je vous l'avais indiqué dans un des commentaires de mon fichier précédent, je ne crois pas qu'on puisse affecter un formatage à une partie seulement d'une cellule qui contient une formule. On peut copier la feuille (en valeur) sur une autre feuille et colorer cette dernière puis imprimer cette feuille en couleur si on le désire.

Dans le fichier joint, quand on active la feuille "MENU REPAS PARENTS-val", on y copie les formats et valeurs de la feuille "MENU REPAS PARENTS".
Puis on colorie les textes de la feuille nouvellement copiée. Les codes se trouvent dans Module1 et le module de code de la feuille "MENU REPAS PARENTS-val". J'ai formaté "maison" en gras et couleur bleu (c'est plus joli).

BOISGONTIER · 20 Mars 2019

Bonjour,

On ne peut pas modifier sur des formules.

Boisgontier

julie_sem · 20 Mars 2019

mapomme à dit:
Bonjour @julie_sem,

Comme je vous l'avais indiqué dans un des commentaires de mon fichier précédent, je ne crois pas qu'on puisse affecter un formatage à une partie seulement d'une cellule qui contient une formule. On peut copier la feuille (en valeur) sur une autre feuille et colorer cette dernière puis imprimer cette feuille en couleur si on le désire.

Dans le fichier joint, quand on active la feuille "MENU REPAS PARENTS-val", on y copie les formats et valeurs de la feuille "MENU REPAS PARENTS".
Puis on colorie les textes de la feuille nouvellement copiée. Les codes se trouvent dans Module1 et le module de code de la feuille "MENU REPAS PARENTS-val". J'ai formaté "maison" en gras et couleur bleu (c'est plus joli).

Merci Merci Merci beaucoup pour votre aide. Vous me faites gagner un temps précieux.

Mettre un mot en couleur

julie_sem

XLDnaute Nouveau

mapomme

XLDnaute Barbatruc

BOISGONTIER

XLDnaute Barbatruc

Pièces jointes

mapomme

XLDnaute Barbatruc

Pièces jointes

julie_sem

XLDnaute Nouveau

Pièces jointes

mapomme

XLDnaute Barbatruc

Pièces jointes

BOISGONTIER

XLDnaute Barbatruc

Pièces jointes

julie_sem

XLDnaute Nouveau

Discussions similaires