aynı sayfada veri karşılaştırma

[rolgun]

arkadaşlar epeyce vaktimi alan bir konuda yardımınızı istiyorum exel bilgim fazla yok müşteri çeklerimden ciro ettiklerimin listeden çıkmasını sağlamak istiyorum yardımlarınız için tşk.

 

[ileriexcel]

®

®®®®®®®®®®

 

[hamitcan]

Aşağıdaki kodu dener misiniz?

Sub CIKARTT()
For t = 2 To [a65536].End(3).Row
Set bul = Columns("f").Find("*" & Left(Cells(t, 2), Len(Cells(t, 2)) - 9) & "*")
If Not bul Is Nothing Then
Cells(t, 2).Interior.ColorIndex = 6
Range("e" & bul.Row & ":g" & bul.Row).Delete Shift:=xlUp
End If
Next
End Sub

 

[rolgun]

sn ileriexcel dosyayı inceledim :yardim: açıklama yazarsan sevinirim makro çalışmadı

 

[rolgun]

sn. hamitcan kod için tşk. ederim bana tam tersi gerekli yani diğer tarafı renklendirmesi gerekiyor üzerinde çalışayım biraz yardımın için tşk. ederim:hey:

 

[hamitcan]

müşteri çeklerimden ciro ettiklerimin listeden çıkmasını sağlamak istiyorum

Kod zaten istediğiniz gibi çalışıyor. Çıkardığı çekleri ise renklendiriyor.(Bu kısmı siz istemediğiniz halde ben ekledim.Kısacası uyumsuz olan var ise ortaya çıksın diye)

 

[rolgun]

sn hamitcan emeğine tşk. ederim işlem çözüldü