Vba: mesaj kutusuna yeni bir satır nasıl eklenir (örnekle)
Bir ileti kutusuna yeni bir satır eklemek için VBA’daki vbNewLine deyimini kullanabilirsiniz.
Bu ifadeyi kullanmanın iki yaygın yolu şunlardır:
Yöntem 1: İleti kutusuna yeni bir satır ekleyin
Sub MsgBoxAddLine()
MsgBox "This is the first line " & vbNewLine & "This is the second"
End Sub
Yöntem 2: İleti kutusuna birden çok yeni satır ekleme
Sub MsgBoxAddLine()
MsgBox "This is the first line " & vbNewLine & vbNewLine & "This is the second"
End Sub
Aşağıdaki örnekler vbNewLine ifadesinin pratikte nasıl kullanılacağını göstermektedir.
Örnek 1: Yeni satırlar olmayan bir mesaj kutusu oluşturma
Yeni satır içermeyen uzun bir cümle içeren bir mesaj kutusu oluşturmak için aşağıdaki sözdizimini kullanabiliriz:
Sub MsgBoxAddLine()
MsgBox "This is the first line and I wish I could add a second line because this sentence is getting really long"
End Sub
Bu makroyu çalıştırdığımızda aşağıdaki çıktıyı alıyoruz:
Mesaj kutusundaki cümlenin belirli bir uzunluğa ulaştığında yeni bir satırda başladığını unutmayın.
Örnek 2: Yeni satırlı bir mesaj kutusu oluşturma
“Bu ilk satırdır” dizesinden sonra yeni bir satır oluşturan bir mesaj kutusu oluşturmak için aşağıdaki sözdizimini kullanabiliriz:
Sub MsgBoxAddLine()
MsgBox "This is the first line " & vbNewLine & "This is the second"
End Sub
Bu makroyu çalıştırdığımızda aşağıdaki çıktıyı alıyoruz:
vbNewLine komutunu kullanarak mesaj kutusunda yeni bir satır başlatabildik.
Örnek 3: Birden çok yeni satır içeren bir mesaj kutusu oluşturma
“Bu ilk satırdır” dizesinden sonra iki yeni satır oluşturan bir mesaj kutusu oluşturmak için aşağıdaki sözdizimini kullanabiliriz:
Sub MsgBoxAddLine()
MsgBox "This is the first line " & vbNewLine & vbNewLine & "This is the second"
End Sub
Bu makroyu çalıştırdığımızda aşağıdaki çıktıyı alıyoruz:
vbNewLine deyimini iki kez kullanarak mesaj kutusuna iki yeni satır eklemeyi başardık.
Bu, mesaj kutusundaki iki dize arasında etkili bir şekilde boş bir satır oluşturdu.
Ek kaynaklar
Aşağıdaki eğitimlerde VBA’da diğer ortak görevlerin nasıl gerçekleştirileceği açıklanmaktadır:
VBA: Son kullanılan satırı nasıl bulabilirim?
VBA: Son kullanılan sütun nasıl bulunur?
VBA: birden fazla satır nasıl eklenir