how to use check box to select items from combobox

vaibhav2015

Registered User.
Local time
Today, 23:16
Joined
Sep 15, 2015
Messages
25
Hi,
I have created form and I have two combo box in that form . I want to select all option from two combobox when I select check box.
I create below vba codes but , when I just add one combo box in fields its work but when I add fields from both combo box its not working.
please advice how i can select all fields from both combobox by clicking one check box.

Private Sub Check28_Click()

If Me!Check28 = True Then
Me!Plant.Selected(0) = True
Me!Plant.Selected(1) = True
Me!Plant.Selected(2) = True
Me!Plant.Selected(3) = True
Me!Plant.Selected(4) = True
Me!Plant.Selected(5) = True
Me!Plant.Selected(6) = True
Me!Plant.Selected(7) = True
Me!Plant.Selected(8) = True
Me!Plant.Selected(9) = True
Me!Sales_org.Selected(1) = True
Me!Sales_org.Selected(2) = True
Me!Sales_org.Selected(3) = True
Me!Sales_org.Selected(4) = True
Me!Sales_org.Selected(5) = True
Me!Sales_org.Selected(6) = True
Me!Sales_org.Selected(7) = True

Else
Me!Plant.Selected(0) = False
Me!Plant.Selected(1) = False
Me!Plant.Selected(2) = False
Me!Plant.Selected(3) = False
Me!Plant.Selected(4) = False
Me!Plant.Selected(5) = False
Me!Plant.Selected(6) = False
Me!Plant.Selected(7) = False
Me!Plant.Selected(8) = False
Me!Plant.Selected(9) = False
Me!Sales_org.Selected(1) = False
Me!Sales_org.Selected(2) = False
Me!Sales_org.Selected(3) = False
Me!Sales_org.Selected(4) = False
Me!Sales_org.Selected(5) = False
Me!Sales_org.Selected(6) = False
Me!Sales_org.Selected(7) = False

End If


End Sub
 
can you please advie how to use True/false. I got error for that line.
 

Users who are viewing this thread

Back
Top Bottom