XL 2016 SI (cellule de couleur) alors

Phil69970

XLDnaute Barbatruc

• 13 Juin 2024

• #2

Bonjour @grumeau10

grumeau10 à dit:

Pensez-vous que cela est possible?

Cliquez pour agrandir...

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

Un peu léger comme demande !!!

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

 

Vote positif 0 Vote négatif

G

grumeau10

XLDnaute Nouveau

• 13 Juin 2024

• #3

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"

 

Pièces jointes

• Copie de Annualisation ACM Clem.xlsx

  190.8 KB · Affichages: 5

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 13 Juin 2024

• #4

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

Code:

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)

 

Pièces jointes

• Copie de Annualisation ACM Clem.xlsm

  207.3 KB · Affichages: 5

Vote positif 0 Vote négatif

Nicolas JACQUIN

XLDnaute Impliqué

Supporter XLD

• 13 Juin 2024

• #5

Bonjour,
Vous aimez tous le vert en ce moment

VB:

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

 

Vote positif 0 Vote négatif