Vba kullanarak metin nasıl kaydırılır (örnekle)

Bir Excel çalışma sayfasındaki belirli hücrelerdeki metni sarmak için VBA’daki WrapText özelliğini kullanabilirsiniz.

Bu özelliği pratikte kullanmanın üç yaygın yolu şunlardır:

Yöntem 1: Belirli bir hücrenin metnini kaydır

 Sub UseWrapText()
Range(" B2 ").WrapText = True
End Sub

Yöntem 2: Hücre Metnini Belirli Bir Aralığa Kaydır

 SubUseWrapText ()
Range(" B2:B11 ").WrapText = True
End Sub

Yöntem 3: Çalışma sayfasındaki tüm hücrelerin metnini kaydır

 Sub UseWrapText()
Cells.WrapText = True
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:

Hadi gidelim!

Örnek 1: VBA Kullanarak Belirli Bir Hücrenin Metnini Sarma

Metni yalnızca B2 hücresine sarmak için aşağıdaki makroyu oluşturabiliriz:

 Sub UseWrapText()
Range(" B2 ").WrapText = True
End Sub

Bu makroyu çalıştırdığımızda B2 hücresine tıklayıp üst şeritteki Giriş sekmesindeki Hizalama grubunda Metni Sarma seçeneğinin etkin olduğunu görebiliriz:

Ancak kaydırılmış metni gerçekten görebilmek için B sütununun uzunluğunu kısaltmamız ve 2. satırın yüksekliğini artırmamız gerekir:

Artık B2 hücresindeki metnin kaydırıldığını, B sütunundaki diğer tüm hücrelerdeki metnin kaydırılmadığını kolayca görebiliriz.

Örnek 2: VBA Kullanarak Hücre Metnini Belirli Bir Aralıkta Sarma

B2:B11 aralığındaki her hücredeki metni kaydırmak için aşağıdaki makroyu oluşturabiliriz:

 Sub UseWrapText()
Range(" B2:B11 ").WrapText = True
End Sub

Bu makroyu çalıştırdığımızda aşağıdaki çıktıyı alıyoruz:

Artık B2:B11 aralığındaki her hücrenin sarılmış metin içerdiğini görebiliriz.

Örnek 3: VBA kullanarak bir çalışma sayfasındaki tüm hücrelerin metnini sarma

Metni bir çalışma sayfasının her hücresine sarmak için aşağıdaki makroyu oluşturabiliriz:

 Sub UseWrapText()
Cells.WrapText = True
End Sub

Bu makroyu çalıştırdığımızda aşağıdaki çıktıyı alıyoruz:

Artık çalışma sayfasındaki her hücrenin sarılmış metin içerdiğini görebiliriz.

Not : VBA WrapText özelliğine ilişkin tüm belgeleri 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: Yazı tipi rengi nasıl değiştirilir?
VBA: Bir dizedeki karakterler nasıl değiştirilir?
VBA: Biçimlendirmeli bir satır nasıl eklenir