Ã?ncelikle her iki comboboxıda denetim araç kutusundan seçin. İlkini formlar araç kutusundan seçmişsiniz. Birinci comboboxa aşağıdaki kodu yazın.
[vb:1:d254e3f0ec]Private Sub ComboBox2_Click()
[e4] = ComboBox2.Value
ComboBox1.Clear
For a = 5 To 15 Step 2
ComboBox1.AddItem Sheets("sayfa2").Cells(ComboBox2.ListIndex + 2, a).Value
Next
End Sub
[/vb:1:d254e3f0ec]
İkinci comboboxada aşağıdaki kodu yazın.
[vb:1:d254e3f0ec]Private Sub ComboBox1_Click()
[e6] = ComboBox1.Value
End Sub[/vb:1:d254e3f0ec]
Not:Sorunuzu bir kaç cümle ilede mesajınızın içinde açıklamanızı rica ediyorum, herkesi dosyanın içine bakmaya zorlamayalım lütfen.