Strādājot ar virknēm VBA, izmantojiet vbNewLine, vbCrLf vai vbCR, lai ievietotu rindas pārtraukumu / jaunu rindkopu.
Šajā rakstā tiks arī apspriests, kā izmantot līnijas turpinājuma rakstzīmi, lai turpinātu paziņojumu savā faktiskajā VBA kodā jaunā rindā.
Izmantojot vbNewLine
Šis kods parāda, kā jūs izmantotu vbNewLine, lai otro teksta virkni ievietotu jaunā rindā tūlītējā logā:
| 1234567891011 | Apakšpunkta izmantošanavbNewLine ()Dim StringOne kā virkneDim StringDwo As StringStringOne = "Šī ir pirmā virkne"StringTwo = "Šī ir otrā virkne"Atkļūdot. Drukāt virkni Viens un vbNewLine & StringTwoBeigu apakš |
Rezultāts ir šāds:
Izmantojot vbCrLf
Šis kods parāda, kā jūs izmantotu vbCrLf, lai otro teksta virkni ievietotu jaunā formas rindā:
| 123456789101112131415 | Apakšizmantojot vbCrLf ()Dim StringOne kā virkneDim StringDwo As StringStringOne = "Šī ir pirmā virkne"StringTwo = "Šī ir otrā virkne"ActiveSheet.Shapes.AddShape (msoShapeRectangle, 15, 15, 100, 50). AtlasietAr atlasi.Characters.Text = StringOne & vbCrLf & StringTwoBeigt arBeigu apakš |
Rezultāts ir šāds:
Izmantojot vbCR
Šis kods parāda, kā jūs izmantotu vbCR, lai otro teksta virkni ievietotu jaunā rindiņā ziņojumu lodziņā:
| 1234567891011 | Apakš, izmantojot vbCR ()Dim StringOne kā virkneDim StringDwo As StringStringOne = "Šī ir pirmā virkne"StringTwo = "Šī ir otrā virkne"MsgBox StringOne un vbCr & StringTwoBeigu apakš |
Rezultāts ir šāds:
Turpinot paziņojumu VBA
Lai turpinātu paziņojumu no vienas rindas uz otru savā VBA kodā, varat izmantot rindas turpinājuma rakstzīmi (“_” jeb pasvītrojumu). Šis kods parāda, kā izmantot rindas turpinājuma rakstzīmi:
| 12345 | Apakšrindas turpinājums ()Ja diapazons ("b1"). Vērtība> 0, tad _Diapazons ("c1"). Vērtība = "Lielāks par nulli"Beigu apakš |
