Declaration d'une variable pour listbox

Résolu
amine69500 Messages postés 471 Statut Membre -  
thev Messages postés 2073 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

es ce que quelqu'un peu me dire svp , comment je peu faire pour declarer une variable
jai deux userform

dans le userform1 jai deux bouton qui apele le userform2, et dans le userform2 jai une listbox , je souhaite la remplir suivant le bouton sur lequelle jai appuyer le bouton 1 range ("A1:B10") et le bouton 2 c'est range ("A13:B20") .

merci de votre aide

2 réponses

thev Messages postés 2073 Date d'inscription   Statut Membre Dernière intervention   717
 
Private Sub CommandButton1_Click()

Load UserForm2
UserForm2.ListBox1.RowSource = "A1:B10"
UserForm2.ListBox1.ColumnCount = 2
UserForm2.Show

End Sub

Private Sub CommandButton2_Click()

Load UserForm2
UserForm2.ListBox1.RowSource = "A13:B20"
UserForm2.ListBox1.ColumnCount = 2
UserForm2.Show

End Sub
0
amine69500 Messages postés 471 Statut Membre 12
 
bonjour , merci , ca marche super

bonne journer a vous
0
amine69500 Messages postés 471 Statut Membre 12
 
bonjour

es ce que vous pouvez me dire , comment je peu faire svp

jai créer un bouton ajouter je souhaite ajouter les elements de la list dans une autre listbox donc jai fai ca

Private Sub AddButton_Click()

ListBox2.AddItem ListBox1.Text

End Sub

je souhaite mettre une valeur true dans la cellule de droite de ma listbox:
exemple si je sui dans la listbox1.rowsource = A1:B10
si je selectionne la 1ere ligne dans ma listbox1 et je fai ajouter ca met true dans C1
et si je selectionne la derniere ligne dans ma listbox1 et je fai ajouter ca met true dans C10

merci de votre aide
0
thev Messages postés 2073 Date d'inscription   Statut Membre Dernière intervention   717
 
Private Sub AddButton_Click()

ListBox2.List = ListBox1.List
Range("C1").Offset(ListBox1.ListIndex, 0).Value = True

End Sub
0