EXCEL VBA BÜYÜKHARF YAPMAK

[@muhammedsaltan724]

Filitreli hücrelerde kopyala-yapıştır eklentisi veya makrosu yok mu?

[@farukcubukcu]

Merhaba, bu makronun işi seçilen alanı büyükharfe çevirmek. Filtrelenmiş alanın yapıştırılması için yazılabilir tabi. Ama orada tablonun yan tarafına olamayacağını bilmek gerekir. Bir de F5 ise özel seçim var.
th-cam.com/video/H_NyPIAF7sQ/w-d-xo.html
Makro için düzenli bir tablo yapısı olması gerekir. Uygun seçim ve uygun yere yapıştırılabilir. Makro ile de yapılabilir. Örnek bir tablo gönderirseniz yapmaya çalışırız. [e-mail]

[@muhammedsaltan724]

hocam küçük harf macrosunu da paylaşabilir misiniz?

[@farukcubukcu]

Merhaba,
Büyük harf Ucase, küçükharf Lcase ile olacak. i, İ'ları da ayarlarsınız.
Sub büyükharfyeni()
'
' büyükharfyeni Makro
'
Dim alan As Range
Set alan = Selection
For Each cell In alan
cell.Value = Replace(cell.Value, "i", "İ")
cell.Value = Replace(cell.Value, "ı", "I")
cell.Value = UCase(cell)
Next
'
End Sub

[@muhammedsaltan724]

@@farukcubukcu teşekkürler hocam

[@muhammedsaltan724]

@@farukcubukcu hocam yazım düzeninde de Application.Proper yazılacak yanılmıyorsam. Burda Türkçe karakter sorununu nasıl çözeriz hocam?

[@farukcubukcu]

Merhaba, Application. ile excel'in fonksiyonlarını çağırmak anlamına gelir. Application.VLOOKUP ya da ne ise Proper de olabilir Kullanmadım. Ucase, LCase kullanılıyor. Proper için de şu şekild eolması gerekir sanıyorum:
vbProperCase ile olabilir:
ymetin= StrConv(metin, vbProperCase)

[@muhammedsaltan724]

@@farukcubukcu
Sub YAZIMDÜZENİ()
Dim alan As Range
Set alan = Selection
For Each cell In alan
ymetin= StrConv(metin, vbProperCase)
Next
End Sub ÇALIŞMADI