السلام عليكم
برجاء المساعدة
عمودين اريد اختيار خليتين منها (activecell) عمود تاريخ وعمود كود
عمود الكود متكرر الصفوف وعمود التاريخ غير متكرر
cmdbutton1_click
Dim oo As Worksheet
For Each oo In ThisWorkbook.Worksheets
For Each u In oo.Range("a2:a1000")
For Each Y In oo.Range("c2:c1000")
If y = ComboBox1.Text Then
oo.Select
u.Select
Y.Select
Exit For
End If
Next Y
Next u
Next oo
ActiveCell.Value = ComboBox1.Value
TextBox1.Value = ActiveCell.Offset(0, 1).Value
end sub
هذا الكود حاولت فيه ..مرة يقف عند اول بحث ومرة يستكمل لاخر صف ...اريد تعديل الكود---وشكرااا