Comment changer de couleur une zone

Bonjour.

tu peux faire:
Private Sub Numéro_MouseUp(Button As Integer, Shift As Integer, X As Single,
Y As Single)
Me.Numéro.BackColor = RGB(255, 0, 0)
Me.Numéro.ForeColor = RGB(255, 255, 255)
End Sub
et la zone sera en blanc sur rouge.
il est préférable de le faire sur MouseUp car si on se trompe on peut
déplacer la souris ailleurs et ça ne change pas la couleur.

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Marc Demont" <mdemont@nordnet.fr> a écrit dans le message de
news:cg4ej0$d9l$1@news.nordnet.fr...

Bonjour,

Sur base d'un click de souris appuyée, comment modifier la couleur de zone
?

---
Private Sub Liste0_MouseDown(Button As Integer, Shift As Integer, X As
Single, Y As Single)

??

End Sub

bonjour
tu peux faire
Private Sub Liste0_MouseDown(Button As Integer, Shift As Integer, X As
Single, Y As Single)
If Button = acLeftButton Then
Moncontrol.BackColor = macouleur
End If
sachant que button prend la valeur du bouton appuye
acleftbutton
acrightbutton
acmidlebutton

"Marc Demont" <mdemont@nordnet.fr> a écrit dans le message de
news:cg4ej0$d9l$1@news.nordnet.fr...

Bonjour,

Sur base d'un click de souris appuyée, comment modifier la couleur de zone
?

---
Private Sub Liste0_MouseDown(Button As Integer, Shift As Integer, X As
Single, Y As Single)

??

End Sub