Récupérer la couleur avec liste déroulante

midoparis · 11 Mars 2009

Bonjour à tous !

J'ai une liste de noms et chaque cellule a une couleur différente.
A coté, j'ai une liste déroulante qui pointe sur cette liste de noms.

Comment récupérer la couleur de la cellule initiale automatiquement ?

Merci de votre aide !!

ILoveZadig · 11 Mars 2009

Re : Récupérer la couleur avec liste déroulante

Bonjour,

Une méthode, qui peut être fastidieuse en fonction du nombre de noms que tu as, consiste à appliquer une mise en forme conditionnelle.

Tu mets tes conditions, la valeur de la cellule égale à "tel nom" tu cliques sur le bouton format et tu choisis la couleur désirée.

C'est valable uniquement si la liste de noms n'est pas trop conséquente.. 🙂

BOISGONTIER · 11 Mars 2009

Re : Récupérer la couleur avec liste déroulante

Bonjour,

La liste est nommée Couleurs

Code:

Private Sub Worksheet_Change(ByVal Target As Range)
  If Not Intersect([planning], Target) Is Nothing Then
    On Error Resume Next
    Target.Interior.ColorIndex = [couleurs].Find(Target, LookAt:=xlWhole).Interior.ColorIndex
  End If
End Sub

Données/Validation

JB

Récupérer la couleur avec liste déroulante

midoparis

XLDnaute Nouveau

ILoveZadig

XLDnaute Occasionnel

BOISGONTIER

XLDnaute Barbatruc

Discussions similaires

Récupérer la couleur avec liste déroulante

midoparis

XLDnaute Nouveau

ILoveZadig

XLDnaute Occasionnel

BOISGONTIER

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency