Discussion :

[panda78]

Bonjour je n'arrive pas à colorer mon dernier bouton en orange claire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Tit = Array(65280, 65535, 16776960, 255, 16776960, 46)
For i = 1 To 6
    Me.Controls("CommandButton" & i).BackColor = Tit(i - 1)
Next i

j'ai pourtant mis 46 mais le bouton s'affiche en noir....

[Daniel.C]

Bonjour,

"46" correspond au code ColorIndex. Le code couleur équivalent est 26367.

[panda78]

Merci