Gelişmiş filtrelemede problem

Katılım
22 Haziran 2007
Mesajlar
21
Excel Vers. ve Dili
Office Pro 2010 TR
üstatlar değişik bir sorunum var kısaca özetlemek gerekirse

bir sütun daki mükerrer kayıtları başka bir sütuna gelişmiş filtreleme ile aktarıyorum fakat en üste gelen kayıt hep iki kez yazıyor örneğin

A gelişmiş filtre ile sonrası B
akk akk
akk akk
akk bkk
akk
bkk
bkk
bkk

neden böyle oluyor nerede hata yapıyorum.
 

Ekli dosyalar

Son düzenleme:

Ömer

Moderatör
Yönetici
Katılım
18 Ağustos 2007
Mesajlar
22,184
Excel Vers. ve Dili
Microsoft 365 Tr
Ofis 2016 Tr
Merhaba,

Tabloda başlık satırı kullanmadığınız için ilk hücreyi başlık olarak kabul ediyor. Başlık satırı eklerseniz bu sorunla karşılaşmazsınız.
 
Katılım
22 Haziran 2007
Mesajlar
21
Excel Vers. ve Dili
Office Pro 2010 TR
Benim bunu asıl kullandığım yerde başlık satırı vardı ve aynı sorun oluyordu, şimdi denedim yine olmuyor.
 

Mahir64

Destek Ekibi
Destek Ekibi
Katılım
19 Nisan 2006
Mesajlar
6,682
Excel Vers. ve Dili
Excel 2013-Türkçe
Excel 2016-Türkçe
Merhaba,

Eklediğiniz resim ile dosya uyuşmuyor. Dosyanızda başlıklar yok, B1 hücresine BAŞLIK yazın ve tekrar deneyin.
 
Katılım
22 Haziran 2007
Mesajlar
21
Excel Vers. ve Dili
Office Pro 2010 TR
ekteki dosyayı dediğiniz gibi güncelledim bi bakabilirmisiniz şimdi
 
Katılım
22 Haziran 2007
Mesajlar
21
Excel Vers. ve Dili
Office Pro 2010 TR
sağolun hocam, anladığım kadarıyla gelişmiş filtreleme yapmak için her iki sütununda başlığının aynı olması gerekiyor, benim yaptığım gibi birisi liste 1 diğeri liste 2 şeklinde olursa olmuyor.
 

Ömer

Moderatör
Yönetici
Katılım
18 Ağustos 2007
Mesajlar
22,184
Excel Vers. ve Dili
Microsoft 365 Tr
Ofis 2016 Tr
Başlığın aynı olmasından ziyade, yeni liste oluştururken eski başlığı da alarak sıralama yapar. Bu yüzden başlık kullanmadığınız zaman ilk hücreyi başlık olarak varsayar diye yazmıştım.

Elle değilde, otomatik olarak başlığın farklı olmasını istiyorsanız makro yardımıyla bu işlemin tümünü gerçekleştirmenizi tavsiye ederim.

Makro Örneği:

A Sütunudaki verileri C sütununa benzersiz aktarır. Aktardıktan sonra C1 hücresindeki başlık adını "Liste2" olarak değiştirir.

Kod:
Sub Gelsm_filtre()
 
    Dim son As Long
 
    Range("C:C").Clear
    son = Cells(Rows.Count, "A").End(xlUp).Row
 
    Range("A1:A" & son).AdvancedFilter xlFilterCopy, , Range("C1"), True
 
    Range("C1") = "[COLOR=blue]Liste2[/COLOR]"
 
End Sub
 
Üst