Code VBA et insertion de valeur pour liste déroulante
Résolu
vanessa
-
m@rina Messages postés 24071 Date d'inscription Statut Contributeur Dernière intervention -
m@rina Messages postés 24071 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
Je suis enseignante et j'ai décidé d'utiliser au mieux le TNI présent dans ma classe. Pleine d'enthousiasme je me lance dans un power point avec des textes à trous. L'idée est que les listes déroulantes donne plusieurs choix possibles aux élèves.
Après 4h de recherche, j'ai trouvé le mode développeur, insérer la liste déroulante dans ma première phrase mais je me casse les dents sur le code VBA pour insérer les valeurs... Très honnêtement je n'y connais rien en code. En fouillant sur différent forum j'en suis arrivée là :
Private Sub ComboBox1_DropButtonClick()
If ComboBox1.ListCount = 0 Then
With ComboBox1
ComboBox1.AddItem "?"
ComboBox1.AddItem "!"
ComboBox1.AddItem "."
ComboBox1.AddItem "..."
End With
End If
End Sub
Mais quand je lance le diaporama j'obtiens ce message : Erreur compilation attendu : identificateur.
Que manque t-il à mon code?
Bon sinon je ne tiens pas forcément à utiliser Power Point, alors si vous connaissez des solutions plus simple mais avec un design aussi sympa (choix des couleurs, des polices, des tailles, etc), je suis preneuse!
Je suis enseignante et j'ai décidé d'utiliser au mieux le TNI présent dans ma classe. Pleine d'enthousiasme je me lance dans un power point avec des textes à trous. L'idée est que les listes déroulantes donne plusieurs choix possibles aux élèves.
Après 4h de recherche, j'ai trouvé le mode développeur, insérer la liste déroulante dans ma première phrase mais je me casse les dents sur le code VBA pour insérer les valeurs... Très honnêtement je n'y connais rien en code. En fouillant sur différent forum j'en suis arrivée là :
Private Sub ComboBox1_DropButtonClick()
If ComboBox1.ListCount = 0 Then
With ComboBox1
ComboBox1.AddItem "?"
ComboBox1.AddItem "!"
ComboBox1.AddItem "."
ComboBox1.AddItem "..."
End With
End If
End Sub
Mais quand je lance le diaporama j'obtiens ce message : Erreur compilation attendu : identificateur.
Que manque t-il à mon code?
Bon sinon je ne tiens pas forcément à utiliser Power Point, alors si vous connaissez des solutions plus simple mais avec un design aussi sympa (choix des couleurs, des polices, des tailles, etc), je suis preneuse!
A voir également:
- Liste déroulante vba
- Liste déroulante excel - Guide
- Liste déroulante en cascade - Guide
- Supprimer liste déroulante excel ✓ - Forum Excel
- Liste déroulante google sheet - Accueil - Guide bureautique
- Supprimer liste déroulante Excel ✓ - Forum Excel
