XL 2016 SI (cellule de couleur) alors

[grumeau10]

Bonjour,
Je suis à la recherche d'une formule qui me permet de compléter une cellule d'un onglet selon la couleur d'une cellule d'un autre onglet.

Exemple :
Si C1 est de couleur verte (sur le 2ème onglet) alors écrire "CP" sur une cellule A2 (du 1er onglet)

Pensez-vous que cela est possible?

Merci infiniment de votre retour

 

[Phil69970]

Bonjour @grumeau10

Pensez-vous que cela est possible?

Oui c'est possible entre autre avec macro (VBA)

Un peu léger comme demande !!!

J'ai pas vu ton fichier......

 

[grumeau10]

Je vous mets le fichier en PJ.
J'aimerais si possible que lorsque je mets la cellule C18 en vert (dans l'onglet "Relevé d'heures"), la cellule O10 (de l'onglet "Récap paie") indique la date correspondante à la cellule B18 de l'onglet "Relevé d'heures"

 

[sylvanu]

Bonjour Grumeau,Phil,
Un essai en PJ avec cette fonction perso, adaptable à vos besoins :

Function Vert(Cell)
    Application.Volatile
    If Sheets("Relevé d'heures").Range(Cell.Address).Interior.Color = RGB(153, 204, 0) Then Vert = "CP" Else Vert = ""
End Function

Evidemment il faut que ce soit toujours le même vert utilisé.
La syntaxe est : =Vert(Cellule)

 

[Nicolas JACQUIN]

Bonjour,
Vous aimez tous le vert en ce moment

Sub test()
    If Worksheets("Feuil2").Range("C1").Interior.Color = RGB(146, 208, 80) Then Worksheets("Feuil1").Range("A2").Value = "CP"
End Sub

A adapter.
Nicolas