Vba kullanarak metin nasıl ortalanır (örnekle)
Excel’deki belirli hücrelerdeki metni sırasıyla yatay ve dikey olarak ortalamak için VBA’daki HorizontalAlignment ve VerticalAlignment özelliklerini kullanabilirsiniz.
Bu özellikleri pratikte kullanmanın üç yaygın yolu şunlardır:
Yöntem 1: VBA Kullanarak Metni Yatay Olarak Ortalayın
SubCenterText ()
Range(" A2:A11 ").HorizontalAlignment = xlCenter
End Sub
Yöntem 2: VBA Kullanarak Metni Dikey Olarak Ortalayın
SubCenterText ()
Range(" A2:A11 ").VerticalAlignment = xlCenter
End Sub
Yöntem 3: VBA Kullanarak Metni Yatay ve Dikey Olarak Ortalayın
SubCenterText ()
Range(" A2:A11 ").HorizontalAlignment = xlCenter
Range(" A2:A11 ").VerticalAlignment = xlCenter
End Sub
Aşağıdaki örnekler, Excel’deki aşağıdaki veri kümesiyle her yöntemin pratikte nasıl kullanılacağını gösterir:
Örnek 1: VBA Kullanarak Metni Yatay Olarak Ortalayın
A2:A11 aralığındaki her hücredeki metni yatay olarak ortalamak için aşağıdaki makroyu oluşturabiliriz:
SubCenterText ()
Range(" A2:A11 ").HorizontalAlignment = xlCenter
End Sub
Bu makroyu çalıştırdığımızda aşağıdaki çıktıyı alıyoruz:
A2:A11 aralığındaki her hücredeki metnin yatay olarak ortalandığına dikkat edin.
Örnek 2: VBA Kullanarak Metni Dikey Olarak Ortalayın
A2:A11 aralığındaki her hücredeki metni dikey olarak ortalamak için aşağıdaki makroyu oluşturabiliriz:
SubCenterText ()
Range(" A2:A11 ").VerticalAlignment = xlCenter
End Sub
Bu makroyu çalıştırdığımızda aşağıdaki çıktıyı alıyoruz:
A2:A11 aralığındaki her hücredeki metnin dikey olarak ortalandığına dikkat edin.
Örnek 3: VBA Kullanarak Metni Yatay ve Dikey Olarak Ortalayın
A2:A11 aralığındaki her hücredeki metni hem yatay hem de dikey olarak ortalamak için aşağıdaki makroyu oluşturabiliriz:
SubCenterText ()
Range(" A2:A11 ").HorizontalAlignment = xlCenter
Range(" A2:A11 ").VerticalAlignment = xlCenter
End Sub
Bu makroyu çalıştırdığımızda aşağıdaki çıktıyı alıyoruz:
A2:A11 aralığındaki her hücredeki metnin yatay ve dikey olarak ortalandığına dikkat edin.
Ek kaynaklar
Aşağıdaki eğitimlerde VBA’da diğer ortak görevlerin nasıl gerçekleştirileceği açıklanmaktadır:
VBA: Yazı tipi rengi nasıl değiştirilir?
VBA: Yazı tipi kalın nasıl yapılır
VBA: Bir dizedeki karakterler nasıl değiştirilir?