Passer au contenu

Comment lier une animation à la souris ?

Solution : en écrivant une macrocommande.

Vous voulez rendre l’une de vos présentations dans
PowerPoint 2000
, de Microsoft, plus interactive. Voici une idée originale : permettre à l’utilisateur de glisser-lâcher un élément (image, forme géométrique, etc.) en “l’accrochant” à la souris.Pour y parvenir, commencez par ajouter une diapositive vide à votre présentation. Puis, tracez une forme quelconque (un rectangle, par exemple) ou insérez une image. C’est cet élément qui suivra la souris. Déroulez ensuite les menus Outils/ Macro/Visual Basic Editor et Insertion/Module. Saisissez alors le listing ci-dessous. Les valeurs 800 et 600 dans les lignes elm.Left=… et elm.Top=… correspondent à la définition de votre écran.
Si vous utilisez une autre définition que 800 x 600 points, vous devrez modifier ces deux constantes.Sélectionnez Fichier/Fermer et retourner à PowerPoint, cliquez sur l’élément à animer et déroulez Diaporama/Paramètres des actions. Sélectionnez l’onglet Cliquer avec la souris et, dans la liste Exécuter la macro, choisissez la valeur Anim. Enregistrez votre présentation, puis testez la macro en mode Affichage/Diaporama. Cliquez sur l’élément puis glissez-le jusqu’au coin supérieur gauche de l’écran afin d’en arrêter le déplacement.Vous pouvez, bien sûr, modifier ces conditions de fin pour les adapter à votre cas particulier, et remplacer la commande Beep par toute autre instruction (un saut à une autre diapositive, par exemple).

🔴 Pour ne manquer aucune actualité de 01net, suivez-nous sur Google Actualités et WhatsApp.


Stéphane Darget