Når du arbeider med strenger i VBA, bruker du vbNewLine, vbCrLf eller vbCR for å sette inn et linjeskift / nytt avsnitt.
Denne artikkelen vil også diskutere hvordan du bruker bruk av linjefortsettelsestegnet for å fortsette en setning i din faktiske VBA -kode på en ny linje.
Bruke vbNewLine
Følgende kode viser deg hvordan du ville bruke vbNewLine for å sette den andre tekststrengen på en ny linje i vinduet Umiddelbart:
1234567891011 | Sub UsingvbNewLine ()Dim StringOne As StringDim StringTwo As StringStringOne = "Dette er streng én"StringTwo = "Dette er streng to"Debug.Print StringOne & vbNewLine & StringTwoSlutt Sub |
Resultatet er:
Bruke vbCrLf
Følgende kode viser deg hvordan du vil bruke vbCrLf for å sette den andre tekststrengen på en ny linje i en form:
123456789101112131415 | Sub UsingvbCrLf ()Dim StringOne As StringDim StringTwo As StringStringOne = "Dette er streng én"StringTwo = "Dette er streng to"ActiveSheet.Shapes.AddShape (msoShapeRectangle, 15, 15, 100, 50) .VelgMed utvalg.Characters.Text = StringOne & vbCrLf & StringTwoSlutt medSlutt Sub |
Resultatet er:
Bruke vbCR
Følgende kode viser deg hvordan du ville bruke vbCR for å sette den andre tekststrengen på en ny linje i en meldingsboks:
1234567891011 | Sub BrukervbCR ()Dim StringOne As StringDim StringTwo As StringStringOne = "Dette er streng én"StringTwo = "Dette er streng to"MsgBox StringOne & vbCr & StringTwoSlutt Sub |
Resultatet er:
Fortsetter en erklæring i VBA
Du kan bruke linjefortsettelsestegnet (“_” aka understrekningen) for å fortsette et utsagn fra en linje til den neste i VBA -koden. Følgende kode viser deg hvordan du bruker linjefortsettelsen:
12345 | Sub LineContinuation ()Hvis område ("b1"). Verdi> 0 Da _Område ("c1"). Verdi = "Greater Than Zero"Slutt Sub |