How to "Undo" Hover Actions in VBA

[jbiehl]

Good Afternoon!
I'm struggling... I have a code for certain actions to occur when I hover over the "OctGB" command button... but how to I make it revert those actions when I'm no longer hovering over "OctGB"?
I feel like it should be obvious, but Google is failing me on this one.
Thanks!
----------------------
Private Sub OctGB_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
ActiveSheet.Shapes("OctGB_Chart").ZOrder msoBringToFront
ActiveSheet.OctGB.BackColor = RGB(200, 210, 240)
ActiveSheet.OctGB.Font.Bold = True
ActiveSheet.OctGB.Font.Size = 10

 

[VBE313]

Is it in a UserForm? You could use the

Sub UserForm_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal x As Single, ByVal y As Single)

If not, you could create an image that is transparent behind the command button. For example, if the image was called "Transparent1" then you could do

Private Sub Transparent1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)

 

[jbiehl]

Is it in a UserForm? You could use the

Sub UserForm_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal x As Single, ByVal y As Single)

If not, you could create an image that is transparent behind the command button. For example, if the image was called "Transparent1" then you could do

Private Sub Transparent1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)

Thanks so much!