A voir également:
- Pb de création de liste dans VBE excel 2003
- Liste déroulante excel - Guide
- Formule excel - Guide
- Creation compte gmail - Guide
- Excel liste déroulante en cascade - Guide
- Media creation tool - Télécharger - Systèmes d'exploitation
5 réponses
Utilisateur anonyme
28 janv. 2005 à 19:40
28 janv. 2005 à 19:40
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
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
Messages postés
14946
Date d'inscription
lundi 18 octobre 2004
Statut
Contributeur
Dernière intervention
24 juin 2020
4 684
28 janv. 2005 à 19:42
28 janv. 2005 à 19:42
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 !
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 !
gbinforme
Messages postés
14946
Date d'inscription
lundi 18 octobre 2004
Statut
Contributeur
Dernière intervention
24 juin 2020
4 684
28 janv. 2005 à 22:56
28 janv. 2005 à 22:56
bonsoir
"il faut sélectionner une plage de cellules contenant la liste
ou saisir la liste séparée par des virgules"
il faut lire : saisir la liste séparée par des points virgules
la "plage de cellules contenant la liste" peut se trouver :
- sur une colonne masquée
- sur une autre feuille masquée
"il faut sélectionner une plage de cellules contenant la liste
ou saisir la liste séparée par des virgules"
il faut lire : saisir la liste séparée par des points virgules
la "plage de cellules contenant la liste" peut se trouver :
- sur une colonne masquée
- sur une autre feuille masquée
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
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
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Utilisateur anonyme
31 janv. 2005 à 15:22
31 janv. 2005 à 15:22
Bonjour,
En VBA :
En supposant que la liste est sur la Feuil1
ComboBox1.ListFillRange = "Feuil2!A5:B8"
Lupin
En VBA :
En supposant que la liste est sur la Feuil1
ComboBox1.ListFillRange = "Feuil2!A5:B8"
Lupin
