Indiquer texte si couleur cellule

Fermé
ReAd-21 - 19 déc. 2017 à 11:04
via55 Messages postés 14402 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 18 avril 2024 - 19 déc. 2017 à 11:50
Bonjour à vous,

Je cherche le moyen d'indiquer un texte spécifique (un chiffre) automatiquement si la cellule contient une couleur au choix.
C'est finalement l'inverse du remplissage d'une cellule si un texte est présent.

Avez vous une idée?
Merci

3 réponses

via55 Messages postés 14402 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 18 avril 2024 2 702
19 déc. 2017 à 11:08
Bonjour

Oui une idée : il faut passer par une macro en VBA
Fait un tableau avec les couleurs que tu veux dans des cellules et dans les mêmes cellules le chiffre correspondant puis indiques dans quelle plage de quelle feuille tu veux que la macro s'applique puis poste ton fichier sur mon-partage.fr, fais créer un lien que tu copies et reviens coller ici

Cdlmnt
Via
0
Merci Via55 pour ta réponse mais je cherche plutot une formule excel du genre: COLOR INDEX THEN= 1
Mais cette formule ne fonctionne pas... As tu une idée?
0
via55 Messages postés 14402 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 18 avril 2024 2 702
19 déc. 2017 à 11:26
Il n'existe pas de formule basée sur les couleurs, la seule option c'est une macro
0
Oui c'est bien par une macro, je me suis mal exprimé...
du coup tu as une idée d'ecriture qui fonctionnerait pour COLOR INDEX THEN= 1 ?
0
via55 Messages postés 14402 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 18 avril 2024 2 702
19 déc. 2017 à 11:39
Comme je te disais dans mon 1er message tu peux faire un tableau de correspondance avec couleur et chiffre dans une même cellule ensuite par macro tu boucle sur les cellules de ta plage et pour chacune sur les cellules du tableau, quand correspondance trouvée la macro met le chiffre dans la cellule
Ou si le nombre de couleur n'est pas très important avec la macro tu boucles sur les cellules de ta plage et par une série de If cell.Interior.Colorindex= .... then cell.value=.... tu inscris le bon chiffre
0
ok je vais tester ça,
merci Via55!
0
via55 Messages postés 14402 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 18 avril 2024 2 702
19 déc. 2017 à 11:50
Exemple de macro qui affiche dans caque cellule de la plage A1:A11 le n° colorindex du remplissage de la cellule :
Sub numcol()
For Each cell In Range("A1:A11")
cell.Value = cell.Interior.ColorIndex
Next
End Sub


Cdlmnt
Via
0