sayfadan comboboxlara veri alma

[Hacı Bayram ÖZKAN]

Merhaba arkadaşlar; aşağıdak kod ile Userform1 üzerinde bulunan ComboBoxlara veri alıyor, ancak aynı kod Userform2 de çalışmıyor

Combolar "GİDEN" Sayfasından alacak. Teşekkürler.



For X = 2 To Cells(65536, 3).End(xlUp).Row
If WorksheetFunction.CountIf(Range("B2:B" & X), Cells(X, 2)) = 1 Then
ComboBox1.AddItem Cells(X, 2).Value
End If

If WorksheetFunction.CountIf(Range("E2:E" & X), Cells(X, 5)) = 1 Then
ComboBox2.AddItem Cells(X, 5).Value
End If

If WorksheetFunction.CountIf(Range("G2:G" & X), Cells(X, 7)) = 1 Then
ComboBox4.AddItem Cells(X, 7).Value
End If

 

[hamitcan]

[color=red]UserForm2[/color].ComboBox1.AddItem Cells(X, 2).Value

şeklinde deneyiniz.

 

[Hacı Bayram ÖZKAN]

[color=red]UserForm2[/color].ComboBox1.AddItem Cells(X, 2).Value

şeklinde deneyiniz.

Sayın hamitcan yaptım olmadı dosyayı ekliyorum, bir bakarsanız sevinirim, ayrıca Listviewe "GİDEN" sayfasındaki verileri aldıramadım bunada bir bakarmısınız. Teşekkür ediyorum. Dua ile kalın

 

[hamitcan]

İnanın kodlarınızın içinde kayboldum ama size fikir vereyim; Listview içine nerede veri alıyorsanız başına

Sheets("GİDEN")

gibi sayfa ismini ekleyiniz derim. Filtreleme ve arama ilgili kodlarda da bu şekilde de yapınız.

 

[Hacı Bayram ÖZKAN]

hamitcanbey teşekkürler bu kodlar Korhan beyin ben zor yazarım, bunları

 

[Hacı Bayram ÖZKAN]

bu denedim oldu, aynı yolla Listview üzerine bu sayfadaki veriler nasıl alınır. Yardımlarınızı beklerim.