Büyük Harfli Hücreleri Filtreleme

[yasinkaratas0359]

Merhabalar;

Excel Satırlarındaki Sadece Büyük Harf İle Yazılan Hücreleri Filtrelemek İstiyorum;

Yardımlarınız İçin Şimdiden Teşekkürler;

Filtre

a

A

a

a

A

 

[pitchoute]

Herhangi biri yardımcı olacaktır.

=VE(TAMAM(A1;BÜYÜKHARF(A1));A1<>"")
=VE(A1=BÜYÜKHARF(A1);A1<>"")
=EĞER(VE(A1<>"";A1=BÜYÜKHARF(A1));DOĞRU;YANLIŞ)

Vba olarak alternatif çözüm;

Sub BuyukHarfleriFiltrele()
    Dim rng As Range
    Dim alan As Range
    Dim son_satir As Long
    son_satir = Cells(Rows.Count, "A").End(xlUp).Row
    Set rng = Range("A1:A" & son_satir)
    On Error Resume Next
    ActiveSheet.ShowAllData
    On Error GoTo 0
    rng.Parent.Range("A1").AutoFilter
    Range("Z1:Z" & son_satir).Formula = "=AND(EXACT(A1,UPPER(A1)),A1<>"""")"
    ActiveSheet.Range("A1").AutoFilter Field:=26, Criteria1:="TRUE"
    Range("Z1:Z" & son_satir).Value = Range("Z1:Z" & son_satir).Value
End Sub

 

[yasinkaratas0359]

Teşekkür Ederim;

Başarılı Olamadım Büyük Harfle Yazılı Olanları Seçip Düzeltmek İstiyorum Bu Şekilde Bin Civarı Satır Mevcut

Yardımlarınız İçin Şimdiden Teşekkürler;

Filtre

aaaaaaaa

AAAAAAAAAAAAAA

AAAAAAAA

aaaaa

 

[pitchoute]

Hocam tam olarak nasıl olmasını istiyorsunuz? Büyük harflerin küçük harflere dönüştürülmesini mi talep ediyorsunuz?

 

[yasinkaratas0359]

Hayır Bir Filtre Oluşturup Sadece Büyük Harfli Olanları Seçmek İstiyorum

 

[Korhan Ayhan]

Merhaba,

Bir yardımcı sütun kullanabilirsiniz. Ya da koşullu biçimlendirmede renklendirme yaptıktan sonra renge göre filtre yaparak sonuca ulaşabilirsiniz.

Ekteki dosyada 2 uygulamada gösterilmiştir.

 

[Gata]

Emeğinize sağlık hocam sitede gezinti yaparken bu soru dikkatimi çekti
=FİLTRE(A2:A6;VE(A2:A6<>"";ÖZDEŞ(A2:A6;BÜYÜKHARF(A2:A6))))
Bu formüle göre büyük harfleri formül ile filtreleme yapıyorum hata veriyor yardımcı olur musunuz
Sitede

 

[Korhan Ayhan]

Böyle deneyiniz.

=FİLTRE(A2:A30;(A2:A30<>"")*ÖZDEŞ(A2:A30;BÜYÜKHARF(A2:A30)))

 

[Gata]

Böyle deneyiniz.

=FİLTRE(A2:A30;(A2:A30<>"")*ÖZDEŞ(A2:A30;BÜYÜKHARF(A2:A30)))

Teşekkür ederim hocam selamlar Allah'a emanet olun iyi geceler