combobox ta seçilen değer (ab sütununa )gelince Choose özelliği alınamıyor uyarısı

[hasan.doru]

Herkese merhaba
Ekli dosyada combobox3 te seçilen değer (ab sütununa )gelince Run time error '1004':
WorksheetFunction sınıfının Choose özelliği alınamıyor.diye bilgi geliyor verileri çağıramıyorum.yardımlarınız için şimdiden teşekkürler.iyi ramazanlar

 

[hasan.doru]

choose özelliği hakkında

Arkadaşlar hepinizden özür dilerim.Uzun zamandır dosya göndermiyordum.acemilik yaptım dosya ekte

 

[Recep İpek]

Sanırım aşağıdaki satırda problem var.Çakışma oluyor gibi.

ComboBox4.RowSource = "sayfa2!ab2:ba1"

ComboBox4.Text = "" satırından önce ComboBox4.RowSource = "" yazmanız gerekebilir.

 

[hasan.doru]

Sayın Ripek
İlginize çok Teşekkür ederim,ancak denedim olmadı.

 

[Levent Menteşoğlu]

Kodu aşağıdaki ile değiştirerek deneyin.

[LEFT]Private Sub ComboBox3_Change()
ComboBox4.RowSource = "sayfa2!ab2:ba1"
If ComboBox3.ListIndex > 0 Then
SUTUN = Replace(Cells(1, ComboBox3.ListIndex).Address(False, False), "1", "")
ComboBox4.Text = ""
ComboBox4.RowSource = "sayfa2!" & SUTUN & "2:" & SUTUN & Sheets("sayfa2").Range(SUTUN & "65536").End(xlUp).Row
End If
End Sub[/LEFT]

 

[hasan.doru]

Merhaba Sayın Leventm
İlginize çok Teşekkür ederim:Sorunum Sayenizde Halloldu.Zaten hazırlamış olduğum dosyadaki kodların hemen hemen hepsi excel.web.tr ye ait Yani tüm bildiklerimi buradan öğrendim, ve öğrenmeye devam ediyorum Allah Hepinizden razı olsun.hoşçakalın