Bonjour mariobross !
dans le code, tu tapes :
Private Sub Nom_du_bouton_Click()
Nom_du_bouton.MousePointer = fmMousePointerCustom
End Sub
Ensuite, dans la colonne de gauche des propriétés, tu vas sur la ligne "MouseIcon", dans la colonne de droite, tu vas voir entre parenthèses le mot "Aucun"...