Checkbox sorun

[okankoc25]

Arkadaşlar 5 tane checbox ve bunlara bağlı comboboxlar var.Örnek olarak 1.checbox işaretleyince ilgili comboboxları hücrelere aktarıyor.Fakat istediğim bunları sıraya dizmek şöyle ki örnek vereyim. checbox 3 ve checbox 4 işaretleyince bunlara bağlı comboboxları hücrelere geçirsin fakat en üst hücreden başlasın.Ben bazı kodlar yazdım ama yanlış oldu;

Bu kod checkbox3 için

Private Sub CheckBox3_Click()
If CheckBox1.Value = False Then
UserForm1!ComboBox6 = ComboBox14
UserForm1!ComboBox5 = ComboBox15
UserForm1!ComboBox7 = ComboBox16
UserForm1!ComboBox8 = ComboBox17
Else
UserForm1!ComboBox10 = ComboBox14
UserForm1!ComboBox11 = ComboBox15
UserForm1!ComboBox12 = ComboBox16
UserForm1!ComboBox13 = ComboBox17
End If
If CheckBox1.Value = True And CheckBox2.Value = True Then
UserForm1!ComboBox14 = ComboBox14
UserForm1!ComboBox15 = ComboBox15
UserForm1!ComboBox16 = ComboBox16
UserForm1!ComboBox17 = ComboBox17
End If
End Sub

Private Sub CheckBox3_Click()
If CheckBox1.Value = False Then
ComboBox6 = ComboBox14
ComboBox5 = ComboBox15
ComboBox7 = ComboBox16
ComboBox8 = ComboBox17
Else
ComboBox10 = ComboBox14
ComboBox11 = ComboBox15
ComboBox12 = ComboBox16
ComboBox13 = ComboBox17
End If
If CheckBox1.Value = True And CheckBox2.Value = True Then
ComboBox14 = ComboBox14
ComboBox15 = ComboBox15
ComboBox16 = ComboBox16
ComboBox17 = ComboBox17
End If
End Sub

 

[okankoc25]

Kimse yok mu yapacak.En azından bir fikir verin o da olmazsa en azından bir fik olsun.