Discussion :

[Claude_Azoulai]

Bonjour à tous

Ayant une bonne expérience en VB6, une certaine expérience en VBA Excel et Word, je bute sur l'emploi des macros en VBA Powerpoint.
Sur une application très simple PowerPoint, j'ai une simple diapositive contenant une photo et un bouton simple.
J'enregistre la macro d'une action qui s'appelle Macro1.
Sur le bouton , je fais un clic droit et choisi "Paramètres de actions...".
Dans "Action suite à un clic" je coche la sélection "Exécuter la macro :", et je choisi Macro1 dans la liste déroulante qui se trouve en dessous.

Normalement, quand je lance le diaporama et que je clique sur ce bouton, la macro "Macro1" doit être lancée... et bien non.
J'ai mis un point d'arrêt au milieux de cette macro, mais il n'est jamais atteint.
J'ai même essayé d'ajouter "Public" devant le nom de la macro mais c'est pareil.
Je signale que j'ai signé numériquement la macro avant de l'enregistrer.
Quelqu'un peut-il me dire où je me plante ?
Merci de votre aide
P.S. La macro s'exécute bien quand je la lance depuis Visual Basic Editor

Claude Azoulai

[Invité]

Bonjour

Je pense que dans ton code tu as des Select ou Selection, cela ne fonctionne pas en mode diaporama, il faut revoir ton code pour les supprimer.

En effet l'enregistreur de macro donne des selection à tire la rigot qui ne fonctionnent pas en mode diaporama.

Philippe

[Claude_Azoulai]

Merci Philippe

C'est vrai, dans la formule il y avait le mot Selection.
Mais j'ai modifié la macro de la manière suivante :
-----------------------------------------------

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Sub Macro1()
'
    Dim Toto As Integer
    Toto = 1
End Sub

-----------------------------------------------
et j'ai mis un point d'arrêt sur la ligne Toto = 1

he bien la macro n'est pas appelée car il ne se passe rien quant je clique sur le bouton cité plus haut.

Le problème persiste et je suis déçu.

Claude Azoula

[Invité]

Re

he bien la macro n'est pas appelée car il ne se passe rien quant je clique sur le bouton cité plus haut.

C'est normal, car ta macro a pour seul but de donner la valeur 1 à la variable Toto, tout se fait en mémoire, donc rien ne s'affiche.

Que veux-tu faire ? Est-ce que tu peux mettre le code d'avant ?

Philippe

[Claude_Azoulai]

Bonjour Philippe

Pour me familiariser avec VBA PowerPoint, j' ai créé un diaporama minimum pour essayer d'utiliser les macros.
J'ai donc enregistré une macro dans laquelle je me contente d'insérer un bouton sur la seule diapositive que contient ma présentation.
Voici le code obtenu :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Sub Macro1()
'
' Macro enregistrée le 22/07/2009 par Claude Azoulai
'
    ActiveWindow.Selection.SlideRange.Shapes.AddShape(msoShapeActionButtonHome, 240.88, 128.25, 73.75, 73.75).Select
End Sub

Pour répondre à ton explication, j'ai créé la macro avec Toto dans VBA Word et VBA Excel et je t'assure que le point d'arrêt fonctionne parfaitement.
J'en conclus, peut-être à tors, que la macro n'est pas appelée dans PowerPoint.

Une chose qui pourrait m'aider ce serait d'avoir un exemple d'une présentation qui utilise des macros, mais je n'en ai pas trouvé.

En tout les cas, merci de passer un peu de ton temps pour m'aider.

Claude Azoulai

[Invité]

Re

En fait on a un fonctionnement différent sur PPT par rapport à Word et Excel, et certaines erreurs ou arrêt n'apparaissent pas en mode diaporama.

Pour déboguer, ce que je fais, c'est que insères des boites de dialogues (msgbox).

La macro que tu as fait avec l'enregistreur à pour but de rajouter un bouton d'action avec son type et son positionnement.

Pour avoir des exemples que ce que l'on peut faire en VBA, tu as quelques bouts de code sur le forum et nos tutos :

Pour ceux qui comportent du VBA :
Celui-ci : http://starec.developpez.com/tuto/pptnavigation/ où tu trouveras des exemples d'ajout de boutons d'actions.

et ceux-là : http://powerpoint.developpez.com/cours/?page=vba

Philippe

[Claude_Azoulai]

Merci Philippe

Je vais utiliser les liens que tu m'as envoyés avec attention.

En fait, le but final est de faire apparaitre sur une carte d'Israël que nous avons visité, une flèche montrant où se trouve le lieu auquel renvoit une série de boutons quand le lecteur passe le curseur dessus (les boutons).

J'ai, grace à toi, du grain à moudre.

Claude Azoulai