Macro de passage d'une diapo à l'autre

Bjr à tous,

Je souhaite mettre en place une macro avec boite de dialogue qui permet si on répond pour l'affirmative à la question de la boite de dialogue de passer vers une diapo de mon choix

Voici le code que j'utilise pour le moment (la boite de dialogue fonctionne ms pas la transition vers une autre diapo)

Code:

---

1 2 3 4 5 6

Public Sub test() config = vbYesNo + vbQuestion + vbDefaultButton2 reponse = MsgBox("Cette partie du navigateur contient les informations relatives: Souhaitez-vous y entrer?", config, " SMS ") If reponse = vbNo Then End SlideShowWindows(3).View.GotoSlide 7 End Sub

---

J'utilise ppt 03
Merci d'avance

Bonjour et bienvenue sur le forum Office de DVP.

J'ai refait un peu ta procédure pour qu'elle soit un peu plus normalisé avec des explications :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Public Sub test() ' déclaration de variables Dim lngReponse As Long ' question lngReponse = MsgBox("Cette partie du navigateur contient les informations relatives: Souhaitez-vous y entrer?", vbYesNo + vbQuestion + vbDefaultButton2, " SMS ") ' test de la réponse If lngReponse = vbNo Then Exit Sub Else SlideShowWindows(1).View.GotoSlide 7 End If End Sub

---

1 - Penses à déclarer tes variables
2 - Ton If avait un problème de syntaxe
3 - Utilises Exit Sub au lieu de End
4 - Dans SlideShowWindow j'ai remplacé par 1, car je n'avais qu'un diaporama d'ouvert, si tu mets 3, cela signifie que tu as 3 diaporamas d'ouvert, et que le passage à la 7 ème diapo se fait sur le troisième. Est-ce le cas ?

Starec

Rebjr,

Effectivement c'est le cas j'ai 3 diaporamas qui sont ouverts

Merci pour les modifications de normalisation sur mon code

Donc résolu ?

Si oui, un petit clique sur le bouton :resolu: en bas de la discussion.

Merci

Starec

NON c'est pas résolu
la transition vers la diapo 7 ne se fais pas

Dsl

Re

Enlève le 3, en fait copie mon code intégralement pour voir.

Starec

J'ai déjà essayer et cela ne fonctionne pas non plus

Je ne vois pas ce qui bloque

Re

Moi non plus, je ne vois pas ce qui bloque.

Est-ce que par hasard tu n'aurais pas dans les autres diaporamas d'autres procédures qui se nomment test ?

Starec

Non je fait bien attention a cela un je n'ai crée qu' une seule macro nommée test

:koi: j'ai fait le test avec plusieurs fichiers d'ouverts, et aucun soucis.

Comment lances-tu la procédure ?

Starec

J'ai moi aussi fais le test avec d'autres diaporamas et la ton code fonctionne parfaitement

par contre je ne vois pas trop ce que tu me demande sur le lancement de ma procédure?tu l'avais peut être compris mais je ne suis pas un crac en VB (dsl)

Citation:

---

Envoyé par DArkswordman

J'ai moi aussi fais le test avec d'autres diaporamas et la ton code fonctionne parfaitement

---

Tu dis qu'il fonctionne, mais alors quel est le problème, je ne comprends pas :koi:

Citation:

---

par contre je ne vois pas trop ce que tu me demande sur le lancement de ma procédure?

---

Lors de quel action tu lances la procédure, appui sur un bouton, clique sur une forme ? Et comment as-tu fait pour la mettre en place.

Starec

Il fonctionne sur un diaporama vierge que j'ai crée pour le tester

Quant au lancement de ma procédure je pensais bien que c'était cela que tu voulais mais je n'étais pas sur.
J'utilise un bouton d'action pour activer la macro

Re

Citation:

---

Envoyé par DArkswordman

Il fonctionne sur un diaporama vierge que j'ai crée pour le tester

---

Cela voudrait dire qu'il y a une interaction avec des éléments (code) qu'il y a dans ton diaporama actuel.

As-tu compilé ton projet pour trouver des erreurs de code dans le menu Débogage, puis Compiler ...(c'est le premier).

En effet si tu as une erreur dans ton code, il se peut que cela bloque tout.

Peux-tu mettre ton diaporama en pièce jointe (en le zippant sinon cela ne passe pas).


Starec

Je l'ai compilé il n'y a pas d'erreur dans le code

En ce qui concerne la mise en pièce jointe du power point je vais essayer mais cela va me prendre du temps car il contient des infos confidencielle de mon entreprise il faut donc que je les supprime

Et voila le power point

A la base il fait deux diapo ms j'ai réduit pour qu'il passe

Re

J'imagine que tu veux naviguer par les mots qui sont sous tes bonhomme de la deuxième diapositive.

Comme il s'agit de groupe cela pose un problème, il faut que tu sélectionnes ton texte, par exemple prévention, pour le mettre en surbrillance, ensuite tu choisis l'action (clique droit, puis paramètres des actions). Ton texte devrait être souligné comme un lien hypertexte.

Starec

Non la pour le moment se sont des liens temporaires car en fait je compte mettre des boutons d'actions sans remplissage par dessus l'image du bonhomme et du texte qu'il a dessous