afficher 1 en D4 si B4 est de couleur verte

excelnoober · 14 Novembre 2017

bonjour
je pense avoir tout mis dans le titre,
j ai une liste de noms en colonne B dont certains ont ete colorés en vert selon une MFC. dans un premier temps je voulais faire apparaitre une msg box si une cellule verte apparaissait en colonne B.
n ayant pas de reponse j ai repensé la demarche.

faire apparaitre en D4 le chiffre 1 si la cellule B4 est verte
pour ensuite faire apparaitre un msgbox si une cellule de ma colonne D contient le chiffre 1
pourriez vousm aioder SVP ?

kingfadhel · 14 Novembre 2017

Bonsoir,

Code:

Sub couleurs()
   If Range("B4").Interior.color = RGB(0, 128, 0) Then
   Range("D4") = 1
   End If
  
End Sub

excelnoober · 14 Novembre 2017

bonsoir et merci kingfadhel
etant un peu perdu
ce code text je dois le copier sur ma feuille ou dois je ouvrir un module dans la feuille?
merci

kingfadhel · 14 Novembre 2017

Re,
Une autre solution qui s'étend sur toute la colonne B: détecte la dernière cellule et teste si la couleur est verte ensuite met "1" dans la cellule D correspondante.

afficher 1 en D4 si B4 est de couleur verte

excelnoober

XLDnaute Junior

kingfadhel

XLDnaute Impliqué

excelnoober

XLDnaute Junior

kingfadhel

XLDnaute Impliqué

Pièces jointes

Discussions similaires