Colorer un plusieurs mots dans une cellule

Y compris Power BI, Power Query et toute autre question en lien avec Excel
j
jpsept
Membre habitué
Membre habitué
Messages : 100
Inscrit le : 8 septembre 2014
Version d'Excel : 2013

Message par jpsept » 15 mars 2018, 16:47

Bonjour à tous,

Je souhaites colorer un ou plusieurs mots dans les cellule des colonnes H et AD en fonction de leur valeur avec différentes couleurs.

Fichier joint

Merci de votre aide

Jean Pierre
Valeur de Mentions de dangers colonne H et AD.xlsx
fichier test
(29.21 Kio) Téléchargé 22 fois
Colorer un plusieurs mots dans une cellule
Colorer un plusieurs mots dans une cellule
exemple couleur spécifiques.JPG (28.13 Kio) Vu 347 fois
Avatar du membre
Yvouille
Passionné d'Excel
Passionné d'Excel
Messages : 9'018
Appréciations reçues : 78
Inscrit le : 6 avril 2007
Version d'Excel : 2016

Message par Yvouille » 17 mars 2018, 21:15

Salut Jean-Pierre,

Dans le fichier ci-joint, la macro placée derrière le bouton en place en C1 devrait faire ce que tu souhaites.

J’ai un peu modifié les couleurs afin de me simplifier la tâche, mais si c’est important, je peux modifier un peu mon code afin d’utiliser exactement les couleurs que tu souhaites.

Si en revanche ce n’est pas important, je te conseillerai de prendre deux autres couleurs à la place de ce vert et ce gris qui sont peu visibles.

Cordialement.
Valeur de Mentions de dangers colonne H et AD_V1.xlsm
(42.08 Kio) Téléchargé 14 fois
Yvouille

Valais de Coeur
Avatar du membre
Yvouille
Passionné d'Excel
Passionné d'Excel
Messages : 9'018
Appréciations reçues : 78
Inscrit le : 6 avril 2007
Version d'Excel : 2016

Message par Yvouille » 18 mars 2018, 08:34

Je me suis rendu compte d'un petit problème : si la même référence est présente plus de deux fois dans la même cellule, mon code n'en tient pas compte.

Voici un code corrigé.
Valeur de Mentions de dangers colonne H et AD_V2.xlsm
(42.08 Kio) Téléchargé 15 fois
Yvouille

Valais de Coeur
j
jpsept
Membre habitué
Membre habitué
Messages : 100
Inscrit le : 8 septembre 2014
Version d'Excel : 2013

Message par jpsept » 18 mars 2018, 12:15

Bonjour Yvouille,

Je te remercie de tes réponses concernant ma demande.

J'ai testé , mais hélas , le resultat est partiel avec une erreur de code , je te joint les copies écrans

Cordialement

Jean Pierre
copie écran code
copie écran code
copie écran avec coloriage manquant sur deux valeurs
copie écran avec coloriage manquant sur deux valeurs
Avatar du membre
dhany
Passionné d'Excel
Passionné d'Excel
Messages : 7'075
Appréciations reçues : 698
Inscrit le : 3 octobre 2017
Version d'Excel : 2007 FR

Message par dhany » 18 mars 2018, 16:01

Bonjour Jean-Pierre,

Je te propose ce fichier Excel :
Valeur de Mentions de dangers colonne H et AD_V2.xlsm
(40.64 Kio) Téléchargé 17 fois
Ctrl c ➯ mise en couleur
Ctrl n ➯ mise en noir

Bien sûr, tu peux aussi utiliser tes 2 boutons.  ;;)

  En H1, il y a un espace en trop  au bout de la 4ème ligne, juste après "H334" ! c'est mieux de l'éviter ! j'ai laissé cet espace uniquement pour te montrer que mon code VBA est adapté à de tels cas (je n'ai pas vérifié s'il y a d'autres cas de ce genre ; à toi de voir ça !  :mrgreen:).

Si besoin, tu peux demander une adaptation.
Merci de me donner ton avis.

dhany
j
jpsept
Membre habitué
Membre habitué
Messages : 100
Inscrit le : 8 septembre 2014
Version d'Excel : 2013

Message par jpsept » 18 mars 2018, 17:05

Merci de ton aide DHanny,

Effectivement c'est le resultat recherché, super

Peux m’insérer la macros que tu viens de créer dans la macros globale jointe "Fred" et la rendre fonctionnelle avec le fichier de base joint .

merci de ton aide

je te joint le fichier de base avant le lancement de la macro "fred" et la marcro en question

Jean Pierre
Fichier_Excel_2018 - 13 03 2018.xlsx
Fichier initial avant lancement macro fred
(11.33 Kio) Téléchargé 15 fois
Fred.txt
macro générale fred
(9 Kio) Téléchargé 12 fois
Avatar du membre
dhany
Passionné d'Excel
Passionné d'Excel
Messages : 7'075
Appréciations reçues : 698
Inscrit le : 3 octobre 2017
Version d'Excel : 2007 FR

Message par dhany » 18 mars 2018, 18:52

Je te retourne tes 2 fichiers modifiés :
Fichier_Excel_2018 - 18 03 2018.xlsm
(39.63 Kio) Téléchargé 21 fois
Fred.txt
(10.18 Kio) Téléchargé 15 fois

À l'ouverture du fichier Excel, tu es sur la 2ème feuille "Data", et tu peux voir la colonne AD ; Ctrl c ➯ mise en couleur ; Ctrl n ➯ mise en noir ; dans les 2 cas, ça applique aussi  pour la colonne H (même si tu ne la vois pas).

Fais en sorte de voir la colonne H ; Ctrl c ➯ mise en couleur ; Ctrl n ➯ mise en noir ; dans les 2 cas, ça applique aussi  pour la colonne AD (même si tu ne la vois pas).

Bien sûr : les couleurs appliquées sont celles de la 1ère feuille "Colors", et si tu fais Ctrl c ou Ctrl n sur cette feuille, ça ne fait rien du tout (sécurité);;)

⚠  Dans ton exercice initial, toutes les valeurs étaient séparées par un espace ; dans ton vrai fichier : en colonne H, le séparateur est une virgule ; en colonne AD, c'est mixte : le séparateur est parfois un espace et parfois une virgule ; j'ai donc adapté mon code VBA initial en conséquence.

⚠  En AD6, tu as même 2 valeurs qui sont séparées par une double virgule !!!  ::(  c'est :  H332,,H302 ; tu as pu voir que mon code VBA marche même avec une pareille anomalie ; je te laisse corriger, et essaye de faire des saisies plus rigoureuses !  ;;)

Si tu as besoin d'une autre adaptation, tu peux demander.
Merci de me donner ton avis.

dhany
Avatar du membre
Yvouille
Passionné d'Excel
Passionné d'Excel
Messages : 9'018
Appréciations reçues : 78
Inscrit le : 6 avril 2007
Version d'Excel : 2016

Message par Yvouille » 18 mars 2018, 19:54

Salut Jean-Pierre,

C’est vraiment surprenant que mon code ne fonctionne pas chez toi car tu penses bien que je l’avais testé avant de te l’envoyer et il fonctionne très bien ici.
Capture.JPG
Tu avais attendu plus de 48 heures afin que quelqu’un te réponde et je pense que tu aurais pu attendre ce soir afin que je traite ton problème comme tu me l’as demandé. Mais dhany, qui est très très fort, a pensé que c’était bien de venir à ma rescousse. Je lui ai déjà dit que c’est dommage qu’il n’aide pas plutôt d’autres membres restés complètement en rade :|

Cordialement.
Yvouille

Valais de Coeur
j
jpsept
Membre habitué
Membre habitué
Messages : 100
Inscrit le : 8 septembre 2014
Version d'Excel : 2013

Message par jpsept » 18 mars 2018, 20:27

Yvouille,

Dans tous les cas , ton aide à été précieuse, et je suis certain que ta solution est fonctionnelle , mais le mode de fonctionnement du forum permets plusieurs réponses , pour un même sujet , au final que doit on faire ?

Je te remercie de ton aide .

Jean pierre
j
jpsept
Membre habitué
Membre habitué
Messages : 100
Inscrit le : 8 septembre 2014
Version d'Excel : 2013

Message par jpsept » 18 mars 2018, 21:38

Dhany,

Merci pour les fichiers , je reviens vers toi demain , je pourrais tester au calme

Bonne soirée

Jean Pierre
Répondre Sujet précédentSujet suivant
  • Sujets similaires
    Réponses
    Vues
    Dernier message