Liste de régions à sélection multiple

Bonjour, dans le cadre de mes études je dois rendre un projet VBA, or la programmation et moi ça fait deux... Je sollicite donc votre aide.
Le projet est un petit programme qui selon les région choisie, le carburant, le type de route, et la consommation, calcule le nombre de litres consommé et le prix total.
Pièce jointe 434141
En fait, on choisit les régions grâce au menu déroulant, et le carburant grâce aux petit ronds à cocher
Mon premier problème est qu'en l’état actuel des choses je ne peux pas choisir plusieurs régions mais juste une.
Pièce jointe 434143
Il faudrait des petites cases à cocher devant chaque région...
Et je ne sais pas du tout comment faire pour que lorsque l'on clique sur sp95 par exemple, la cellule à l'intersection de la région choisie précédemment et de la colonne sp95 soit activée et que son contenu s'affiche sur la zone de texte de l'userform.
Merci de votre aide

Bonsoir,

Vous avez sélectionné une combobox, 1 seul choix possible.
il faut sélectionner une listBox. Pour avoir plusieurs choix possibles, dans les propriétés, sous comportement, à la ligne multiSelect prendre 1 - fmMultiSelectMulti

Cdlt

Merci de ton aide mais ca me donne ca...Pièce jointe 434346

Bonjour,

Agrandissez votre ListBox pour voir davantage de régions. Mais même si vous n'en voyez qu'une seule à la fois, le fait de cliquer dessus conserve la sélection.

Voici trois exemples de ListBox avec une hauteur différente mais qui font la même chose.
Pièce jointe 434384

Cdlt

Bonjour,
Ah d'accord !! ( excuse moi je debute :oops:)

Bonjour,
voila mon projet et presque terminé mais lorsque je ne coche pas de région et que je rentre les autres données le programme plante...
Merci
Pièce jointe 436828

Bonjour,

j'ai ajouté 1 ligne pour sortir du programme si aucune région n'est sélectionnée, si ce n'est pas suffisant, me décrire l'action qui provoque l'erreur.
Ligne ajoutée:
Exit Sub '***********on sort du programme si aucune région n'est sélectionnée**************

Code:

---

1 2 3 4 5

Private Sub CommandButton1_Click() If IReg = 0 Then MsgBox "choisissez des régions" 'il faut choisir au moins une région Exit Sub '***********on sort du programme si aucune région n'est sélectionnée************** End If

---

Cdlt

Bonjour,
Si c'est parfait ;)
Il me reste un dernier problème : lorsque je clique sur le bouton réinitialiser, Y'a le MSGbox qui s'ouvre 3 fois et après c'est bon Quelqu'un a une idée pour ne pas qu'ils s'affichent ?Pièce jointe 436917