Bonjour à tous,

je voudrais mettre un bouton de commande et que celui s'écarte dès que l'on essaie de cliquer dessus.
J'arrive à le faire sur excel avec le code suivant :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
 
Private Sub CommandButton1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
          CommandButton1.Top = Int((300 * Rnd))
          CommandButton1.Left = Int((300 * Rnd))
End Sub
Mais si je fais la même chose avec PPT, j'ai un nouveau bouton qui apparait aléatoirement alors que l'original reste et que quand la souris est sur ce dernier.

Merci d'avance pour votre aide.