Při práci s řetězci ve VBA použijte vbNewLine, vbCrLf nebo vbCR k vložení konce řádku / nového odstavce.
Tento článek bude také diskutovat o tom, jak použít znak pro pokračování řádku, aby bylo možné pokračovat v prohlášení ve vašem aktuálním kódu VBA na novém řádku.
Použití vbNewLine
Následující kód ukazuje, jak byste použili vbNewLine k vložení druhého textového řetězce na nový řádek v okně Immediate:
1234567891011 | Sub UsingvbNewLine ()Dim StringOne As StringDim String Dva jako řetězecStringOne = "This is String One"StringTwo = "Toto jsou dva řetězce"Debug.Print StringOne & vbNewLine & StringTwoEnd Sub |
Výsledek je:
Použití vbCrLf
Následující kód ukazuje, jak byste použili vbCrLf k vložení druhého textového řetězce na nový řádek ve tvaru:
123456789101112131415 | Dílčí použití vbCrLf ()Dim StringOne As StringDim String Dva jako řetězecStringOne = "This is String One"StringTwo = "Toto jsou dva řetězce"ActiveSheet.Shapes.AddShape (msoShapeRectangle, 15, 15, 100, 50). VyberteS výběrem.Characters.Text = StringOne & vbCrLf & StringTwoKonec sEnd Sub |
Výsledek je:
Pomocí vbCR
Následující kód ukazuje, jak byste použili vbCR k vložení druhého textového řetězce na nový řádek do pole se zprávou:
1234567891011 | Dílčí použití vbCR ()Dim StringOne As StringDim String Dva jako řetězecStringOne = "This is String One"StringTwo = "Toto jsou dva řetězce"MsgBox StringOne & vbCr & StringTwoEnd Sub |
Výsledek je:
Pokračování prohlášení ve VBA
Pomocí znaku pokračování řádku („_“ neboli podtržítka) můžete v kódu VBA pokračovat v prohlášení z jednoho řádku na druhý. Následující kód ukazuje, jak používat znak pokračování řádku:
12345 | Podřádkové pokračování ()Pokud je rozsah („b1“). Hodnota> 0, pak _Rozsah ("c1"). Hodnota = "Větší než nula"End Sub |