Vba kullanarak dizeleri uygun büyük/küçük harfe dönüştürme
Dizedeki her kelimenin ilk harfi büyük ve her kelimenin diğer tüm harfleri küçükse, dize büyük/küçük harf doğrudur .
Dizeleri olan bir hücre aralığını doğru büyük/küçük harfe dönüştürmek için VBA’da aşağıdaki sözdizimini kullanabilirsiniz:
Sub ConvertToProperCase()
Dim i As Integer
For i = 2 To 10
Range(" B " & i) = StrConv(Range(" A " & i), vbProperCase)
Next i
End Sub
Bu özel örnek, A2:A10 aralığındaki her dizeyi uygun büyük/küçük harfe dönüştürecek ve sonuçları B2:B10 aralığında görüntüleyecektir.
Aşağıdaki örnek, bu sözdiziminin pratikte nasıl kullanılacağını gösterir.
Örnek: VBA Kullanarak Dizeleri Doğru Harfe Dönüştürme
Excel’de aşağıdaki dize sütununa sahip olduğumuzu varsayalım:
A sütunundaki her dizeyi doğru büyük/küçük harfe dönüştürmek ve sonuçları B sütununda görüntülemek istediğimizi varsayalım:
Bunun için aşağıdaki makroyu oluşturabiliriz:
Sub ConvertToProperCase()
Dim i As Integer
For i = 2 To 10
Range(" B " & i) = StrConv(Range(" A " & i), vbProperCase)
Next i
End Sub
Bu makroyu çalıştırdığımızda aşağıdaki çıktıyı alıyoruz:
B sütunu, A sütunundaki her dizeyi uygun durumda görüntüler.
Not : VBA’daki StrConv işlevinin tam belgelerini burada bulabilirsiniz.
Ek kaynaklar
Aşağıdaki eğitimlerde VBA’da diğer ortak görevlerin nasıl gerçekleştirileceği açıklanmaktadır:
VBA’da dizeler nasıl karşılaştırılır
VBA’da bir dizedeki boşluklar nasıl kaldırılır
VBA’da bir dizedeki karakterler nasıl değiştirilir?