mükerrer kayıt silme

[celalettin]

merhaba arkadaşlar,

ek excel dosyasında açıkladığım gibi B1 kolonundaki mükerrer isimleri silecek tek satır haline getirecek makro formülüne ihtiyacım var.Yardımcı olacak arkadaşlara şimdiden teşekkürler.

pardon düzeltmeler yapıldı.

 

[dEdE]

Merhaba,

...B1 kolonundaki mükerrer isimleri silecek tek satır haline getirecek makro formülüne ihtiyacım var....

diyorsunuz ama, Örnek dosyabızda B sütununda isimler değil aylar var. Ayrıca örnek dosyanızda "A3 Kolonundaki tekrarlayan isimleri silecek ve tek adede düşürecek makro kurabilirmiyiz." diyorsunuz. İsimler ise C sütununda. Sanki C sütununa göre teke düşürme işlemi yapılacakmış gibi görünüyor.
Acaba ne istiyorsunuz?

NOT:B1 ve A3 kolon değil hücredir.

 

[dEdE]

Merhaba,
Mesajda düzeltme yaptığınızı yeni fark ettim.
Aşağıdaki kodu modüle yapıştırarak dener misiniz?

Sub Süz()
    Columns("E:F").ClearContents
    Set R = Range("B2:C2")
    Range("B2:C6000").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=R, CopyToRange:=Range( _
        "E2:F2"), Unique:=True
End Sub

E ve F sütununda kayıtlar teke indirilmiştir.