Userform_MouseMove() Help

[SMit07]

Hi all,

I'm trying to make a userform with a multipage, and 3 buttons in each page. I'm trying to make it when the mouse is moved over a button, it hides revealing a new button underneath etc (see images).

I cannot however get the buttons to 'unhighlight' upon moving the mouse away.
I'm not entirely sure why, but the following code does not work:

Sub Userform_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
'PURPOSE: Reset Userform buttons to Inactive Status

Begin_Button_1_Inactive.Visible = True
About_Button_1_Inactive.Visible = True
Cancel_Button_1_Inactive.Visible = True

End Sub

The error comes from the 'Sub Userform_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)'
I've also tried replacing the 'Userform' part with 'Page', 'Multipage1' etc and am now fresh out of ideas.

Any help would be greatly appreciated thanks

 

[Logit]

Mouse Over Objects. Detect When Mouse Leaves - OzGrid Free Excel/VBA Help Forum

Review the download file ... Post #6