Private Sub CommandButton2_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
CommandButton2.Top = CommandButton2.Top + 20
End Sub

La première ligne de code : Private Sub CommandButton2_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)

Indique que la macro se déclenche quand on déplace la souris au dessus du bouton n°2 (CommandButton2_MouseMove). Il suffit pour inscrire cette ligne de se placer dans la feuille de code correspondant à la feuille de calcul où se trouve le bouton et de sélectionner (dans les deux listes déroulantes en haut de feuille) l’objet : CommandButton2 et l’événement : MouseMove

CommandButton2.Top désigne la distance entre le bouton et le haut de la feuille

A chaque fois que l’on passe au dessus du bouton, CommandButton2.Top est augmenté de 20, et le bouton se déplace donc de 20 points vers le bas.