VBA'da dizelerle çalışırken, satır sonu / yeni paragraf eklemek için vbNewLine, vbCrLf veya vbCR kullanın.
Bu makale ayrıca, gerçek VBA kodunuzdaki bir ifadeye yeni bir satırda devam etmek için satır devam karakterinin nasıl kullanılacağını tartışacaktır.
vbNewLine'ı kullanma
Aşağıdaki kod, Anında pencerede ikinci metin dizesini yeni bir satıra koymak için vbNewLine'ı nasıl kullanacağınızı gösterir:
1234567891011 | Alt KullanarakvbNewLine()Dim StringOne As StringDim StringTwo As StringStringOne = "Bu, Birinci Dize"StringTwo = "Bu, İkinci Dizi"Debug.Print StringOne & vbNewLine & StringTwoAlt Bitiş |
Sonuç:
vbCrLf kullanma
Aşağıdaki kod, ikinci metin dizesini bir şekilde yeni bir satıra koymak için vbCrLf'yi nasıl kullanacağınızı gösterir:
123456789101112131415 | Alt KullanarakvbCrLf()Dim StringOne As StringDim StringTwo As StringStringOne = "Bu, Birinci Dize"StringTwo = "Bu, İkinci Dizi"ActiveSheet.Shapes.AddShape(msoShapeRectangle, 15, 15, 100, 50).SeçinSeçim ile.Characters.Text = StringOne & vbCrLf & StringTwoİle bitmekAlt Bitiş |
Sonuç:
vbCR'yi kullanma
Aşağıdaki kod, ikinci metin dizesini bir mesaj kutusunda yeni bir satıra koymak için vbCR'yi nasıl kullanacağınızı gösterir:
1234567891011 | Alt KullanarakvbCR()Dim StringOne As StringDim StringTwo As StringStringOne = "Bu, Birinci Dize"StringTwo = "Bu, İkinci Dizi"MsgBox StringOne & vbCr & StringTwoAlt Bitiş |
Sonuç:
VBA'da Bir Açıklamaya Devam Etme
VBA kodunuzda bir ifadeyi bir satırdan diğerine devam ettirmek için satır devam karakterini (“_” diğer adıyla alt çizgi) kullanabilirsiniz. Aşağıdaki kod, satır devam karakterinin nasıl kullanılacağını gösterir:
12345 | Alt SatırDevam ()Eğer Aralık("b1").Value > 0 O zaman _Aralık("c1").Value = "Sıfırdan Büyük"Alt Bitiş |