Hi Peter

CommandButton1_Click is the "when I click this button" event. Mousecursor
over is the MouseMove event:

Private Sub Label1_MouseMove(ByVal Button As Integer, ByVal Shift As
Integer, ByVal X As Single, ByVal Y As Single)
Label1.SpecialEffect = fmSpecialEffectRaised
End Sub

Note that there is no MouseOut event, so you must find another event to
detect when the mouse is no longer over it.

HTH. Best wishes Harald

"Peter" skrev i melding
...
Hi,
A question from a friend of mine. Hope you understand this, cause it's in
dutch. I've tried to translate it at the bottom.

Ik heb een formulier in Vba met een label. Als ik er een commandbutton
bijzet met de code

"Private Sub CommandButton1_Click()
Label1.SpecialEffect = fmSpecialEffectRaised
End Sub"

bij dan krijgt mijn label nen "boebel" als ik op de nop klik. De bedoeling
is echter dat dit gebeurt als ik met de muis over het label ga.

Enig idee iemand?

Translation:
I have a form in vba wich contains a label. When i put a commandbutton in
with the code

"Private Sub CommandButton1_Click()
Label1.SpecialEffect = fmSpecialEffectRaised
End Sub"

then the label gets a bump everytime i press the button. However this
should
only happen when i put the cursor on top of the label.

Any ideas anyone?

regards,
Peter