XL 2010 [Résolu] Rechercher couleur cellule et afficher l'index exacte

Chris401

XLDnaute Accro

• 19 Décembre 2016

• #2

Bonsoir

Essaye en ajoutant dans le module de classe

VB:

c = Mid(boutton.Name, 14, 2)

 

Vote positif 0 Vote négatif

Lone-wolf

XLDnaute Barbatruc

• 19 Décembre 2016

• #3

Bonsoir Chris 🙂

Nickel ! Merci pour le tuyau. Tu ne serait pas plombier par hazard?? 😉😀

À quoi correspondent 14 et 2 ?

 

Dernière édition: 19 Décembre 2016

Vote positif 0 Vote négatif

Chris401

XLDnaute Accro

• 19 Décembre 2016

• #4

Re

Mid équivaut à STXT
Mid(Texte,à partir de quel caractère,nombre de caractères à garder)
CommandButton comporte 13 lettres ; donc on veut commencer au 14ème caractère

Soit à partir du 14ème caractère, on en garde 2

 

Dernière édition: 20 Décembre 2016

Vote positif 0 Vote négatif

Lone-wolf

XLDnaute Barbatruc

• 19 Décembre 2016

• #5

Re Chris

Merci pour l'explication. Je vais le copier dans un fichier texte pour me rappeler comment utiliser MID.

 

Vote positif 0 Vote négatif

eriiic

XLDnaute Barbatruc

• 19 Décembre 2016

• #6

Bonjour,

comme tu parles des 56 couleurs et de récupérer l'index exact, l'index c'est .colorindex et non .color.
Jaune par exemple c'est .color = 65535 mais c'est .colorindex = 6
eric

 

Dernière édition: 19 Décembre 2016

Vote positif 0 Vote négatif

Lone-wolf

XLDnaute Barbatruc

• 20 Décembre 2016

• #7

Bonjour Eric, le Forum 🙂

Je viens de relire mon premier message. C'est une erreur de ma part, j'aurais dû écrire ColorIndex effectivement. 😳

 

Vote positif 0 Vote négatif