mükerrer ama tek satırda değil

[cdroy1]

kolay gelsin,
ekli listede yapmak istediğim yapamadığım konuyu gönderdim sabahtan beride formda aradım bulamadım farklı farklı yöntemleri var sadece tek sütunda aynı olanlarla alakalı örnekler var ama 3 4 sütunun taranarak kontrol edildiğini veya nasıl yapıldığını göremedim
cevap olarak makro kod veya commondbuton önerirseniz sevinirim çünkü dosyam bir userformun parçası
şimdiden teşekkürler

 

[fedeal]

sayın Alinin çalışmasına fonksiyon ekleyerek bir şeyler yaptım bakın belki işinize yarar.

 

[cdroy1]

fedeal üstad mantığı anladım teşekkür ederim istediğim gibi olmuş başka fikri olan varsa onlarada bakabilirim

 

[Korhan Ayhan]

Selamlar,

Ekteki örnek dosyayı incelermisiniz.

Option Explicit
 
Sub MÜKERRER_KAYITLARI_SİL()
    Columns("B:D").AdvancedFilter Action:=xlFilterCopy, CopyToRange:=Range("IT1"), Unique:=True
    Columns("IT:IV").Cut Columns("B:D")
    MsgBox "İşleminiz tamamlanmıştır.", vbInformation
End Sub

 

[cdroy1]

sayın korhan ayhan ve fedeal çok teşekkür ederim iyiki varsınız iyiki burdasınız.