OVH Cloud OVH Cloud

créer zone de liste déroulante

2 réponses
Avatar
Céline
Bonjour à tous,

Je souhaite insérer une zone de liste déroulante dans une diapo. J'arrive à
insérer le contrôle mais je ne sais pas comment alimenter la liste avec mes
informations. Pourriez-vous m'indiquer la démarche à suivre ?

D'avance merci.

Céline.

2 réponses

Avatar
hm15
Bonjour Céline,

l'exemple ci-dessous permet d'afficher les diapos à l'aide d'une liste
déroulante. Je te donne la démarche complète :
- ouvre le masque de diapo
- clic droit dans la barre d'outils | Boîte à outils Contrôles
- choisis l'outils "Zone de liste modifiable" et dessine ta liste
- clic droit | Visualiser le code
- copie/colle le code ci-dessous
______________________
Private Sub ComboBox1_DropButtonClick()
ComboBox1.Clear
With ComboBox1
.AddItem "Diapo 1"
.AddItem "Diapo 2"
.AddItem "Diapo 3"
.AddItem "Diapo 4"
End With
End Sub

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

Fais un test déjà avec ce code. Les items affichent les diapos dans l'ordre
(implicitement, elles sont numérotées).
Adapte ensuite le code à tes besoins et personnalise-le (ComboBox1 est peu
parlant par exemple).

Bonne continuation,

Annette
---------------------------------------------------------------------------
www.horizon-micro.com


"Céline" a écrit dans le message de news:
#
Bonjour à tous,

Je souhaite insérer une zone de liste déroulante dans une diapo. J'arrive
à

insérer le contrôle mais je ne sais pas comment alimenter la liste avec
mes

informations. Pourriez-vous m'indiquer la démarche à suivre ?

D'avance merci.

Céline.




Avatar
Céline
Merci beaucoup Annette,

J'ai adapté le code que tu m'as fourni à ce que je souhaitais et cela
fonctionne super !

Céline.

"hm15" a écrit dans le message de news:
#
Bonjour Céline,

l'exemple ci-dessous permet d'afficher les diapos à l'aide d'une liste
déroulante. Je te donne la démarche complète :
- ouvre le masque de diapo
- clic droit dans la barre d'outils | Boîte à outils Contrôles
- choisis l'outils "Zone de liste modifiable" et dessine ta liste
- clic droit | Visualiser le code
- copie/colle le code ci-dessous
______________________
Private Sub ComboBox1_DropButtonClick()
ComboBox1.Clear
With ComboBox1
.AddItem "Diapo 1"
.AddItem "Diapo 2"
.AddItem "Diapo 3"
.AddItem "Diapo 4"
End With
End Sub

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

Fais un test déjà avec ce code. Les items affichent les diapos dans
l'ordre

(implicitement, elles sont numérotées).
Adapte ensuite le code à tes besoins et personnalise-le (ComboBox1 est peu
parlant par exemple).

Bonne continuation,

Annette
--------------------------------------------------------------------------
-

www.horizon-micro.com


"Céline" a écrit dans le message de news:
#
Bonjour à tous,

Je souhaite insérer une zone de liste déroulante dans une diapo.
J'arrive


à
insérer le contrôle mais je ne sais pas comment alimenter la liste avec
mes

informations. Pourriez-vous m'indiquer la démarche à suivre ?

D'avance merci.

Céline.