gratifiant > microsoft.* > microsoft.powerpoint

Mitch (30/06/2006, 23h45)
Bonjour,

je souhaite créer une liste déroulante sous powerpoint et lui paramétrer 3
valeurs différentes comment puis je faire?

Si quelqu'un connaît un tutoriel complet sur powerpoint je suis preneur
Tisane (01/07/2006, 07h43)
Bonjour Mitch,

> je souhaite créer une liste déroulante sous powerpoint et lui paramétrer 3
> valeurs différentes comment puis je faire?


Tu ne dis pas quelle action doit être provoquée lors de la sélection d'un
élément de la liste.

Voici un exemple qui permet de changer simplement de diapo. Pour le mettre
en oeuvre :
- dans le masque des diapositives (afin d'avoir la liste sur chaque diapo),
clic droit dans une des barres d'outils | Boîte à outils Contrôles
- sélectionne l'outil "Zone de liste déroulante" et dessine ta liste
- clic droit sur la liste | Visualiser le code
- entre les lignes Private Sub ComboBox1_Change() et End Sub, copie/colle le
code ci-dessous :
If ComboBox1.ListIndex = -1 Then Exit Sub
SlideShowWindows(1).View.GotoSlide ComboBox1.ListIndex + 1

- copie/colle sous le End Sub précédent le code suivant :
Private Sub ComboBox1_DropButtonClick()
ComboBox1.Clear
With ComboBox1
.AddItem "Diapositive 1"
.AddItem "Diapositive 2"
.AddItem "Diapositive 3"
.AddItem "Diapositive 4"
End With
End Sub
- ferme la fenêtre VBE (Visual Basic Editor) et fais un essai. Pour revenir
rapidement dans le code, <Alt><F11>

> Si quelqu'un connaît un tutoriel complet sur powerpoint je suis preneur


Le meilleur "tutoriel" est sans doute l'aide du logiciel ainsi que les
forums, notamment US (beaucoup plus riches) sur le sujet, car ils répondent
à un moment donné à un besoin précis.
Mais, en l'occurrence, c'est plus d'un tutoriel VBA dont tu as besoin que de
celui de PowerPoint.
Quelques adresses de sites :





etc.
Jean-Pierre FORESTIER (01/07/2006, 10h32)
Pour compléter Tisane : à la place de diapositive 1 (diapositive 2, etc)
dans le code, entre le titre de la diapo au lieu de 1 ou 2, etc...
Tisane (01/07/2006, 10h43)
Bonjour Jean-Pierre,

> Pour compléter Tisane : à la place de diapositive 1 (diapositive 2, etc)
> dans le code, entre le titre de la diapo au lieu de 1 ou 2, etc...


Heureusement que tu es là ;-))
Mais je n'ai pas cru comprendre que Mitch voulait obligatoirement mettre la
liste des diapos comme items dans sa liste déroulante, mais des valeurs qui
n'ont sans doute rien à voir.
Par exemple, cela peut être des années, des services, des lieux, etc.
Mitch (01/07/2006, 10h57)
Bonjour,

Pour détailler la finlité de la chose voilà en fait ce que je dois faire:
je dois faire une maquette avec powerpoint d'un PC de régulation de trafic
urbain. Sur une des diapos il apparaît un carrefour et dans le menu des
actions possibles pour le régulateur j'ai mis en place 3 éléments de contôles
types "optionbutton"
- Clignotant
- Extinction
- Autonome

je souhaite activer la liste déroulante "DuréeCycle" seulement quand
"autonome" est acitvé et dans cette liste je veux que l'opérateur puisse
choisir entre
- 1 min
- 2min
- 3min

"Tisane" a écrit :
[..]
Jean-Pierre FORESTIER (01/07/2006, 15h11)
Tu as sans doute raison.
L'avantage avec les titres est que si tu saisies la première lettre, ...
tout le titre s'affiche ainsi que la bonne diapo
Tisane (01/07/2006, 20h44)
Re-,

[..]
> - 1 min
> - 2min
> - 3min


Il y a sûrement plus "pro" mais tu peux masquer la liste sur Clignotant et
Extinction et l'afficher déroulée automatiquement sur Autonome.

Private Sub Clignotant_Click()
DuréeCycle.Visible = False
End Sub

Idem pour Extinction

Private Sub Autonome_Click()
DuréeCycle.Visible = True
DuréeCycle.DropDown
End Sub

Dans le code de la liste bien sûr, tu remplaces "diapositive x" par "x min",
mais tu l'avais deviné ;-)
phulms (18/12/2008, 23h22)
Jean-Pierre FORESTIER a écrit le 01/07/2006 à 10h32 :
> Pour compléter Tisane : à la place de diapositive 1 (diapositive
> 2, etc)
> dans le code, entre le titre de la diapo au lieu de 1 ou 2, etc...
> --
> Jean-Pierre FORESTIER Microsoft MVP PowerPoint
> Auteur de PowerPoint 2002 chez Micro Application
> "Mitch" a écrit dans
> le message news:


désolé de ressortir des profondeurs ce topic, mais je viens de le trouver

très bonne l'idée de Jean-Pierre mais si on l'applique que faut-il mettre à l
place de

SlideShowWindows(1).View.GotoSlide ComboBox1.ListIndex + 1

car mes diapos ne sont pas la 1 la 2 ...., comment faire un renvoi sur le titr
de la diapo

merci d'avance

Philippe
Jean-Pierre Forestier [MVP[ (19/12/2008, 12h32)
Ou lala le temps passe !!!
Voici le code qui te permet de renvoyer le titre de chaque diapo A toi de
modifier mes titres et/ou d'en ajouter d'autres. Pour ces titres et éviter
toute erreur de saisie, je fais des copier-collers

Private Sub ComboBox1_DropButtonClick()
ComboBox1.Clear
With ComboBox1
.AddItem "Présentation"
.AddItem "Résultats"
.AddItem "Export"
.AddItem "Annexes"
End With
End Sub

Private Sub ComboBox1_Change()
If ComboBox1.ListIndex = -1 Then Exit Sub
SlideShowWindows(1).View.GotoSlide ComboBox1.ListIndex + 1
End Sub

"phulms" <phulms> a écrit dans le message de news:
jvydnRz9hqitItfU4p2dnAA...
[..]
phulms (28/12/2008, 22h09)
Bonsoir

cherchant toujours une réponse à ma question je suis tombé sur votre réponse

alors que je l'ai posé sur un autre forum qui reste muet

aussi merci beaucoup d'y avoir répondu, mais je n'ai pas été assez clair

dans la liste je souhaite avoir
.AddItem "Présentation"
.AddItem "Résultats"
.AddItem "Export"
.AddItem "Annexes"

pour ca c'est ok

mais ma diapo présentation est la 23
ma diapo résultats est la 15
ma diapo Export est la 12
et ma diapo Annexes est la 35

elles ne se suivent pas avec un incrément de 1

comment renvoyer vers le bon n° de diapo ou directement sur le titre

merci d'avance pour la réponse et meilleurs voeux pour 2009
Philippe

"Jean-Pierre Forestier [MVP[" wrote:
[..]
lmsphu (28/12/2008, 22h20)
Bonsoir

super merci pour la réponse, je surveillais sur l'autre forum et en
cherchant toujours une réponse je suis tombé sur ce forum

je n'est pas été assez précis dans ma question

je suis ok sur la liste
.AddItem "Présentation"
.AddItem "Résultats"
.AddItem "Export"
.AddItem "Annexes"

c'est ce que j'avais fait

mais ma diapo présentation est la 23
ma diapo résultats est la 12
ma diapo export est la 9
ma diapo Annexes est la 41

mes diapos de la liste ne se suivent pas et pas avec un incrément

comment faire pour renvoyer sur le bon n° ou sur le titre de la diapo

merci d'avance pour la réponse et melleurs voeux pour 2009
Philippe
cruisejb (22/05/2013, 14h13)
Le vendredi 30 Juin 2006 à 23:45 par Mitch :
> Bonjour,
> je souhaite créer une liste déroulante sous powerpoint et lui
> paramétrer 3
> valeurs différentes comment puis je faire?
> Si quelqu'un connaît un tutoriel complet sur powerpoint je suis preneur Bonjour, je suis très intéressé par vos réponses sur ce sujet.


Mais j'ai un problème : Je souhaite aussi faire une liste déroulante pour alle
d'une diapo à une autre mais j'aimerais que dans cette liste déroulant
n'apparraissent pas les 5 premières diapo.

Comment faire?
Discussions similaires