Powerpoint - bouton fuyant

Bonsoir à tous
Etant en train de faire un diaporama - Powerpoint 2010 - j’aimerais y mettre un bouton fuyant (bouton qui se déplace quand on clique dessus) j’ai cherché sur le net et ai trouvé la macro suivante :
Sub Gag(osh As Shape)
With ActivePresentation.PageSetup
osh.Left=Int(Rnd*.SlideWidth0.9
osh.Top=Int(Rnd.SlideHeight
0.9

End Sub

mais j’ai le message : Erreur de compililation attendue
Pouvez-vous m’aider à trouver l’erreur - Merci d’avance.

Normalement, en cas d’erreur de compilation, ton curseur se positionne sur la ligne en faute dans ton éditeur Visual Basic.

Ta dernière ligne : Rnd.SlideHeight, ce serait pas plutôt Rnd * .SlideHeight comme pour la ligne au-dessus ?

merci gcc - effectivement ta ligne est bonne et j’avais oublié de fermer la parenthèse - tout fonctionne bien -
merci de ton aide