Excel VBA: Skep nuwe lyn in MsgBox (6 voorbeelde)

Hugh West

20-06-2023 Makro's & amp; Excel VBA
  • Deel Dit
Hugh West

Ons gebruik dikwels MsgBox in VBA om die kennisgewing te wys nadat die kodes uitgevoer is. Soms kan 'n enkele reël nie die uitvoer behoorlik wys nie. Dan moet ons nuwe reëls byvoeg . So uit hierdie artikel sal jy 6 nuttige makro's leer om 'n nuwe reël in MsgBox by te voeg deur Excel VBA te gebruik.

Laai oefenwerkboek af

Jy kan die gratis Excel-sjabloon van hier af aflaai en op jou eie oefen.

Skep nuwe reël in MsgBox.xlsm

6 voorbeelde om nuwe lyn in MsgBox te skep met behulp van Excel VBA

1. Gebruik vbNewLine om nuwe lyn in MsgBox by te voeg Deur Excel VBA te gebruik

Hier sal ons vbNewLine in VBA Makro gebruik om 'n reël in by te voeg MsgBox. Ek sal “ Hallo! ” in die eerste reël wys en “ Welkom by ExcelWIKI” in die tweede reël.

Stappe:

  • Druk Alt + F11 om die VBA-venster oop te maak.
  • Dan klik soos volg om voeg 'n module in: Voeg in ➤ Module .

  • Tik later die volgende kodes daarin- 
5532

  • Dan gaan terug na jou blad en klik soos volg om die oop te maak Makro's dialoogkassie: Ontwikkelaar ➤ Makro's .

  • Kies die Makro naam soos gespesifiseer in die kodes .
  • Laastens, druk net Run .

Kyk nou, vbNewLine wys die uitvoer in tweelyne .

Lees meer: VBA om veelvuldige reëls in e-posliggaam in Excel te genereer (2 metodes)

2. Gebruik vbCrLf om nuwe lyn in MsgBox te skep Gebruik VBA in Excel

Nou sal ons nog 'n konstante van VBA - vbCrLf gebruik om 'n nuwe lyn in te skep MsgBox . Dit sal ook 'n nuwe reël tussen die twee opeenvolgende reëls byvoeg.

Stappe:

  • Volg eers die eerste twee stappe vanaf die eerste metode om 'n module in die VBA
  • in te voeg Skryf dan die volgende kodes daarin- 
4107

  • Volg vervolgens die vierde stap vanaf die eerste metode om die Makro-dialoogkassie oop te maak.
  • Kies die Makronaam en druk Run .

Die konstante vbCrLf het <1 bygevoeg>'n nuwe lyn met 'n gapingslyn ook.

Lees meer: Hoe om 'n by te voeg Lyn in Excel-sel (5 maklike metodes)

3. Voeg vbLf in om nuwe reël by te voeg in MsgBox Gebruik Excel VBA

Kom ons gebruik nog 'n konstante- vbLf om 'n nuwe reël in MsgBox in Excel VBA by te voeg.

Stappe:

  • Volg die eerste twee stappe van die eerste metode om 'n module in die VBA in te voeg
  • Skryf later skryf die volgende kodes daarin- 
6424

  • Dan volg die vierde stap vanaf die eerste metode om die Makro-dialoogkassie oop te maak.
  • Kies later die Makronaam soos in die kodes genoem en druk Run .

En kort daarna sal jy die verlangde uitset kry.

Lees meer: Hoe om 'n nuwe reël by te voeg met CONCATENATE-formule in Excel (5 maniere)

4. Pas Chr toe om nuwe lyn in MsgBox te skep Gebruik VBA in Excel

Hier sal ons twee konstantes van VBA gebruik- Chr(13) & Chr(10) om reëls by te voeg.

Stappe:

  • Begin met die eerste twee stappe van die eerste metode om 'n module in die VBA
  • in te voeg Skryf dan die volgende kodes daarin- 
8082

  • Volg daarna die vierde stap vanaf die eerste metode om die Makro-dialoogkassie oop te maak.
  • Kies dan die Makronaam toegewys en druk Run .

Kyk dat ons dieselfde uitvoer gekry het.

5. Voeg nuwe reël binne die makro in Excel VBA by

In die vorige metodes het ons nie die lyn in die kode gebreek nie. Hier sal ons lyne binne die kodes breek en byvoeg.

Stappe:

  • Volg eers die eerste twee stappe vanaf die eerste metode om 'n module in die VBA
  • Volgende, skryf die volgende kodes daarin- 
3424

  • Volg later die vierde stap vanaf die eerste metode om die Makro-dialoogkassie oop te maak.
  • Kies dan net die Makronaam en druk Run .

Nousien, dat makro 'n nuwe lyn bygevoeg het wat 'n gapingslyn tussen die lyne hou.

Lees meer: Hoe om 'n lynbreuk in Excel te doen (4 maniere)

6. Sluit VBA in om nuwe reëls in MsgBox by te voeg deur knoppie te gebruik

In ons heel laaste metode, sal ons die taak op 'n bietjie ander manier doen. Ons sal 'n knoppie stel om lyne in MsgBox by te voeg.

6.1 Knoppie vir Enkellyn

Eers moet ons sal 'n knoppie maak om 'n enkele reël by te voeg. Daarvoor het ek 'n datastel gemaak wat drie selle verteenwoordig om invoer Vannaam , Adres en foonnommer te gee. Wanneer ons op die knoppie klik, sal dit die selle nagaan en as 'n leë sel kry sal die boodskap vir daardie sel wys.

  • Klik soos volg: Ontwikkelaar ➤ Voeg in en dan kies die reghoekige boks van die Vormkontroles-afdeling .

  • Kort daarna sal jy 'n plusteken kry jou wyser, linkskliek jou muis en sleep op die blad om die knoppiegrootte te stel.

  • Dan regskliek jou muis op die knoppie en kies Wysig teks vanaf die kontekskieslys om die knoppienaam te stel.

  • Tik die Naam en klik enige plek op die blad.

  • Weereens regskliek jou muis op die knoppie en kies Wys Makro toe in die kontekskieslys om 'n Makro te stel.

  • Gee op hierdie oomblik 'n Makronaam en druk Nuwe .

  • Tik dan die volgende kodes – 
3885

Kode-ontleding

  • Eers het ek 'n Subprosedure SingleLine_Button geskep.
  • Toe het 'n veranderlike WS verklaar as Werkblad .
  • Toe drie IF-stellings gebruik om die selle na te gaan, as die sel gevul is met waarde dan sal dit ignoreer en as 'n leë sel kry dan sal die ooreenstemmende boodskap deur MsgBox wys.
  • Later, gaan net terug na jou blad en klik die knoppie .

Aangesien die Vannaam -veld leeg is, is dit hoekom dit die kennisgewingboodskap wys.

  • Druk OK en dan sal dit die tweede veld nagaan .

Die tweede veld is ook leeg so dit het 'n n bygevoeg ew line om dit in kennis te stel .

Hier het ek die eerste veld ingevul en die knoppie geklik, en sien dat dit daardie veld oorgeslaan het en na die tweede veld gespring om die boodskap te wys.

6.2 Knoppie vir veelvuldige reëls

Deur toe te ken hierdie knoppie, sal ons verskeie reëls op 'n slag in die boodskapkassie kan byvoeg.

  • Volg eers die eerste 6 stappe van dievorige afdeling om 'n knoppie by te voeg en 'n makro toe te wys.

  • Dan tik die volgende kodes in die makro- 
4629

Kode-ontleding

  • Hier het ek 'n Subprosedure Multiple_Line_Button geskep.
  • Toe verklaar 'n paar veranderlikes WS As Werkblad en Vannaam , Adres , Foon , Foutboodskap Soos
  • Later, gebruik Len en Bereik om die velde te stel.
  • Ten slotte, gebruik If-stellings om te kyk of die velde leeg is of nie . As dit gevul is, sal dit oorslaan en indien nie, dan sal boodskappe deur MsgBox wys.
  • Ten slotte, keer terug na die blad en klik die knoppie .

En sien dit wys drie reëls vir die drie velde soos hulle almal is leeg .

Ek het die eerste veld ingevul en sien nou, dit wys net boodskappe vir die volgende 2 velde .

Lees meer: Hoe om veelvuldige reëls in Excel-sel te plaas (2 maklike maniere)

Gevolgtrekking

Ek hoop die prosedures wat hierbo beskryf word, sal goed genoeg wees om 'n nuwe reël in MsgBox te skep deur Excel VBA te gebruik. Vra gerus enige vraag in die kommentaar afdeling en gee my asseblief terugvoer.

Vorige pos Hoe om wit spasie in Excel te verwyder (6 maklike maniere)
Volgende plasing Hoe om die aantal karakters in 'n sel in Excel te tel (maklikste 6 maniere)

Hugh West is 'n hoogs ervare Excel-afrigter en ontleder met meer as 10 jaar ondervinding in die bedryf. Hy het 'n Baccalaureusgraad in Rekeningkunde en Finansies en 'n Meestersgraad in Besigheidsadministrasie. Hugh het 'n passie vir onderrig en het 'n unieke onderrigbenadering ontwikkel wat maklik is om te volg en te verstaan. Sy kundige kennis van Excel het duisende studente en professionele persone wêreldwyd gehelp om hul vaardighede te verbeter en uit te blink in hul loopbane. Deur sy blog deel Hugh sy kennis met die wêreld, en bied gratis Excel-tutoriale en aanlyn opleiding aan om individue en besighede te help om hul volle potensiaal te bereik.