Pb de création de liste dans VBE excel 2003 Fermé

Question

Bonjour,

Je suis débutant en VBE,
J'essaye de crée des listes de choix dans une feuille excel.
Dans le cadre d'un inventaire logiciel je souhaiterai que la liste des logiciels renseignée dans les cellules excel soit imposé par une liste de choix qui s'ouvre quand on clique sur la cellule.

si qq'un peut m'aider merci d'avance.

roub.

roub · Answer

pour remonter le mesage j'éai desperement besoin d'aide.cdlt.

Utilisateur anonyme · Answer

Bonjour,

Exemple de base à placer derrière la feuille.

Option Explicit
'

Sub EmplirListe()

ComboBox1.ListFillRange = "A5:B8"

End Sub

Private Sub ComboBox1_Change()

Dim Valeur As Variant

Valeur = ComboBox1.Column(0)

Select Case (Valeur)
Case 1: XfrCel (Valeur)
Case 2: XfrCel (Valeur)
Case 3: XfrCel (Valeur)
Case 4: XfrCel (Valeur)
End Select

End Sub
'
Sub XfrCel(Valeur As Variant)

MsgBox Valeur

End Sub
'

Lupin

gbinforme · Answer

bonjour

il faut travailler avec une liste effectivement :

après sélection de la cellule concernée

menu "données" puis "validation"

onglet "options" "autoriser" : choisir "liste"

il faut sélectionner une plage de cellules contenant la liste
ou saisir la liste séparée par des virgules

il faut cocher "liste déroulante"
ne pas cocher "ignorer si vide" pour rendre obligatoire

les onglets

"message de saisie" permet d'afficher une aide

"alerte d'erreur" permet de bloquer la saisie si "style" arrêt choisi

bon courage, ça va fonctionner !

roub · Answer

Merci à tous les 2 pour le coup e main.

Ca marche en VB et aussi directement sous excel.

Seule correction on ne peut pas mettre la liste sous une autre Feuille ( via l'editeur de Excel ). du moins j'ai pas trouvé.

Cdlt.

Roub

Utilisateur anonyme · Answer

Bonjour,En VBA :En supposant que la liste est sur la Feuil1ComboBox1.ListFillRange = "Feuil2!A5:B8"Lupin