Je souhaite faire sélectionner un mois à un utilisateur via un Userform.
Quel contrôle me le permet le plus aisément, et quel macro/code y est assocé ?
Je pensais utiliser une listbox avec l'ensemble des mois sur une des
feuilles du classeur et la syntaxe Me.ListBox1.RowSource = "Feuil1!Mois"
pour faire apparaitre la liste dans la liste box, mais cela ne semble pas
fonctionner. Je dois certainement omettre quelquechose !!!
Private Sub UserForm_Initialize() Dim I As Integer For I = 1 To 12 ListBox1.AddItem MonthName(I) Next I End Sub
Private Sub ListBox1_Click() With ListBox1 MsgBox .List(.ListIndex) End With End Sub
Hervé.
"Yvan" a écrit dans le message news:
Bonjour,
Je souhaite faire sélectionner un mois à un utilisateur via un Userform.
Quel contrôle me le permet le plus aisément, et quel macro/code y est assocé ?
Je pensais utiliser une listbox avec l'ensemble des mois sur une des feuilles du classeur et la syntaxe Me.ListBox1.RowSource = "Feuil1!Mois" pour faire apparaitre la liste dans la liste box, mais cela ne semble pas fonctionner. Je dois certainement omettre quelquechose !!!
Merci de m'éclairer.
-- Merci pour vos réponses.
Salut Yvan,
Regarde si ça te convient :
Private Sub UserForm_Initialize()
Dim I As Integer
For I = 1 To 12
ListBox1.AddItem MonthName(I)
Next I
End Sub
Private Sub ListBox1_Click()
With ListBox1
MsgBox .List(.ListIndex)
End With
End Sub
Hervé.
"Yvan" <Yvan@discussions.microsoft.com> a écrit dans le message news:
E9557C18-E14D-47A2-904A-25F722965E4C@microsoft.com...
Bonjour,
Je souhaite faire sélectionner un mois à un utilisateur via un Userform.
Quel contrôle me le permet le plus aisément, et quel macro/code y est
assocé ?
Je pensais utiliser une listbox avec l'ensemble des mois sur une des
feuilles du classeur et la syntaxe Me.ListBox1.RowSource = "Feuil1!Mois"
pour faire apparaitre la liste dans la liste box, mais cela ne semble pas
fonctionner. Je dois certainement omettre quelquechose !!!
Private Sub UserForm_Initialize() Dim I As Integer For I = 1 To 12 ListBox1.AddItem MonthName(I) Next I End Sub
Private Sub ListBox1_Click() With ListBox1 MsgBox .List(.ListIndex) End With End Sub
Hervé.
"Yvan" a écrit dans le message news:
Bonjour,
Je souhaite faire sélectionner un mois à un utilisateur via un Userform.
Quel contrôle me le permet le plus aisément, et quel macro/code y est assocé ?
Je pensais utiliser une listbox avec l'ensemble des mois sur une des feuilles du classeur et la syntaxe Me.ListBox1.RowSource = "Feuil1!Mois" pour faire apparaitre la liste dans la liste box, mais cela ne semble pas fonctionner. Je dois certainement omettre quelquechose !!!
