Güncel olmayan bir tarayıcı kullanıyorsunuz. Bunu veya diğer web sitelerini doğru şekilde göstermeyebilir. Yükseltmeli veya bir alternatif kullanmalısınız. tarayıcı.
Kullanıcılara faydalı olur umarım.
Private Sub ComboBox1_Change()
'5.04.2021'
'ExcelCozum.Com'
Dim Aranan As String
Dim Satir As Integer
Aranan = ComboBox1.Value
If Aranan = "" Then Exit Sub
Satir = Worksheets("Sayfa3").Range("b:b").Cells.Find(Aranan, Worksheets("Sayfa3").Range("b65000")...