- Katılım
- 5 Eylül 2007
- Mesajlar
- 1,247
- Excel Vers. ve Dili
- ofis 2010
iyi günler; aynı firmaya ait iki mizanın A sütununa göre E ve F sütunlarını karşılaştırıp farklı olanları bulmak istiyorum. örnek buldum ama tam çözemedim. A sütunundaki değere göre aynı olan kimi hücreleri renklendirip kimini renklendirmiyor.
benim yapmak istediğim mizan2 sayfası Mastır sayfa, mizan1 sayfası mizan2 sayfasının A sütunundaki değere bakarak E ve F sütun hücrelerini karşılaştırıp farklı olanları renklendirmik.
benim yapmak istediğim mizan2 sayfası Mastır sayfa, mizan1 sayfası mizan2 sayfasının A sütunundaki değere bakarak E ve F sütun hücrelerini karşılaştırıp farklı olanları renklendirmik.
Kod:
Sub KARSILASTIR()
Set s1 = Sheets("mizan1")
Set s2 = Sheets("mizan2")
For i = 1 To s1.Cells(Rows.Count, 1).End(xlUp).Row
If s1.Cells(i, 5).Value <> s2.Cells(i, 5).Value Then s1.Cells(i, 5).Interior.ColorIndex = 3
If s1.Cells(i, 6).Value <> s2.Cells(i, 6).Value Then s1.Cells(i, 6).Interior.ColorIndex = 3
Next
End Sub
