Discussion :

[Aurianelm]

Bonjour tout le monde !

Voilà j'ai une listbox où les utilisateurs peuvent sélectionner plusieurs intitulés de demandes. Comment, en VBA, dire "Pour chaque demande choisie faire". Je pensais à un For each que je n'ai jamais utilisé mais du coup je ne vois pas quel est mon groupe de données (comment le fixer ?)

Je voudrai que ça donne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
For each demande sélectionnée in listBox
Remplir la fiche avec les données liées à cette demande (données listées dans une feuille excel du même classeur)
La mettre en format PDF
L'enregistrer
Effacer les données de la fiche
Next

Je ne vois pas d'autres moyens car l'utilisateur peut très bien sélectionner 50 demandes. Cette solution m'a l'air pas mal mais quand il s'agit de la traduire en VBA c'est autre chose... Ce n'est que la première ligne que je ne sais pas formuler. Pour le reste ça devrait aller

Merci d'avance pour vos réponses !

[BlueMonkey]

Bonjour,

Pour parcourir la liste des éléments sélectionnés :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Private Sub ListBox1_Click()
    Dim itemIndex As Integer
    For itemIndex = 0 To ListBox1.ListCount - 1
        If ListBox1.Selected(itemIndex) = True Then
            ' texte de l'élément sélectionné :  ListBox1.List(itemIndex)
        End If
    Next itemIndex
End Sub

A+

[Aurianelm]

Ok merci je vais tester