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 ?
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
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).
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.
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).
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).
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.
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).
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.
Merci beaucoup Annette,
J'ai adapté le code que tu m'as fourni à ce que je souhaitais et cela
fonctionne super !
Céline.
"hm15" <hm15@no-horizon-micro.com> a écrit dans le message de news:
#240PS5mDHA.2272@tk2msftngp13.phx.gbl...
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).
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).