Microsoft 365 Création d'un combobox avec uniquement des couleurs

[popcorn9]

Bonjour à tous ,

Je suis débutant en VBA, je me lance dans la programmation.

J'aimerais crée un combobox, dans lequel il y aurait le choix de plusieurs couleurs.

Puis lorsque l'on sélectionne cette couleur, elle s'applique a une ligne de ma listview. Et quand la couleur est choisi, elle s'enleve du combobox.

Merci par avance

 

[patricktoulon]

re
en fait je l'ai trouvé le problème
le calcul pixel doit prendre en compte le zoom sinon ça plante en zoom plus petit que 100 vers la colonne 3
et ca donne un mauvais index en zoom plus grand
je vais revoir cela

 

[patricktoulon]

re
voila il faut changer cette fonction
il faut mettre ce code à la place

Function ptoPx()
'coéfficient point//pixel
    With ActiveWindow
        ptoPx = (((.Panes(1).PointsToScreenPixelsX([A1].Width) - (.Panes(1).PointsToScreenPixelsX(0))) / [A1].Width) / (.Zoom / 100))
    End With
End Function

là maintenant c'est nikel