Günaydın arkadaşlar aşağıda gönderdiğim kodda B Sutunundaki verileri ComboBoxa C sutunundaki Verileri TextBox a gösteriyorum fakat Userform Sayfa2 de olduğu için sayfa2 de ykkarda bahsettiğim işlemi yapıyor.verileri Sayfa1 den almak istediğimde yapamadım bir yardımcı olursanız sevinirim
Verileri Sayfa1 den aşacağım sayfa2 kayıt yapacağım.
UserForm Sayfa2 dedir.
Private Sub ComboBox6_Change()
Dim bul As Range
For Each bul In Worksheets("Sayfa1").Range("B2:C" & [C65536].End(3).Row)
If bul.Value = ComboBox6.Text Then
TextBox2.Value = bul(1, 2).Value
End If
Next bul
‘ Sayfa2 nin J2 hücresine gösterecek
[J2] = ComboBox6.Text
End Sub
Verileri Sayfa1 den aşacağım sayfa2 kayıt yapacağım.
UserForm Sayfa2 dedir.
Private Sub ComboBox6_Change()
Dim bul As Range
For Each bul In Worksheets("Sayfa1").Range("B2:C" & [C65536].End(3).Row)
If bul.Value = ComboBox6.Text Then
TextBox2.Value = bul(1, 2).Value
End If
Next bul
‘ Sayfa2 nin J2 hücresine gösterecek
[J2] = ComboBox6.Text
End Sub