När du arbetar med strängar i VBA, använd vbNewLine, vbCrLf eller vbCR för att infoga en radbrytning / nytt stycke.
Denna artikel kommer också att diskutera hur du använder raden fortsättningstecken för att fortsätta ett uttalande i din faktiska VBA -kod på en ny rad.
Använda vbNewLine
Följande kod visar hur du skulle använda vbNewLine för att sätta den andra textsträngen på en ny rad i fönstret Omedelbar:
1234567891011 | Sub användervbNewLine ()Dim StringOne As StringDim StringTwo As StringStringOne = "Detta är sträng ett"StringTwo = "Detta är sträng två"Debug.Print StringOne & vbNewLine & StringTwoAvsluta Sub |
Resultatet är:
Använda vbCrLf
Följande kod visar hur du skulle använda vbCrLf för att sätta den andra textsträngen på en ny rad i en form:
123456789101112131415 | Sub användervbCrLf ()Dim StringOne As StringDim StringTwo As StringStringOne = "Detta är sträng ett"StringTwo = "Detta är sträng två"ActiveSheet.Shapes.AddShape (msoShapeRectangle, 15, 15, 100, 50) .VäljMed urval.Characters.Text = StringOne & vbCrLf & StringTwoSluta medAvsluta Sub |
Resultatet är:
Använda vbCR
Följande kod visar hur du skulle använda vbCR för att sätta den andra textsträngen på en ny rad i en meddelanderuta:
1234567891011 | Sub använder vbCR ()Dim StringOne As StringDim StringTwo As StringStringOne = "Detta är sträng ett"StringTwo = "Detta är sträng två"MsgBox StringOne & vbCr & StringTwoAvsluta Sub |
Resultatet är:
Fortsätter ett uttalande i VBA
Du kan använda linjen fortsättningstecken (“_” aka understrecket) för att fortsätta ett uttalande från en rad till nästa i din VBA -kod. Följande kod visar hur du använder linjen fortsättningstecken:
12345 | Sub LineContinuation ()If Range ("b1"). Värde> 0 Då _Område ("c1"). Värde = "Större än noll"Avsluta Sub |