مارک کردن داده های تکراری در یک شیت دیگر

[daryushm]

سلام!
یه راهنمایی میخوام واسه مارک شدن ردیفهایی که اسمش تو یک ستون در یک شیت دیگه اومده!
مثلا مثل فایل نمونه ردیفهایی از شیت اول که سلول اول آن با یکی از سلول های اول شیت دوم مشرکه مارک بشه!

ممنون میشم کسی کمکم کنه...

10375

[iranweld]

با سلام
با یک ماکرو ساده قابل انجام هست


Sub TEST()

Macro1

Z1 = Sheet1.Cells(Sheet1.Rows.Count, "A").End(xlUp).Row
Z2 = Sheet2.Cells(Sheet2.Rows.Count, "A").End(xlUp).Row

For J = 1 To Z2
For I = 1 To Z1
If Sheet1.Range("A" & I) = Sheet2.Range("A" & J) Then
Sheet1.Range("A" & I).Interior.ColorIndex = 3
Sheet1.Range("B" & I).Font.ColorIndex = 3

End If
Next
Next


End Sub