Innholdsfortegnelse
Vi bruker ofte MsgBox i VBA for å vise varselet etter å ha kjørt kodene. Noen ganger kan ikke en enkelt linje vise utdataene riktig. Da må vi legge til nye linjer . Så fra denne artikkelen vil du lære 6 nyttige makroer for å legge til en ny linje i MsgBox ved hjelp av Excel VBA.
Last ned øvelsesarbeidsbok
Du kan laste ned den gratis Excel-malen herfra og øve på egenhånd.
Opprett ny linje i MsgBox.xlsm
6 eksempler for å opprette ny linje i MsgBox ved hjelp av Excel VBA
1. Bruk vbNewLine for å legge til ny linje i MsgBox ved å bruke Excel VBA
Her bruker vi vbNewLine i VBA Macro for å legge til en linje i MsgBox. Jeg viser « Hei! » på den første linjen og « Velkommen til ExcelWIKI» på den andre linjen.
Trinn:
- Trykk Alt + F11 for å åpne VBA-vinduet .
- Deretter klikker du som følger for å sett inn en modul: Sett inn ➤ Module .
- Senere skriver du inn følgende koder i den-
2727
- Deretter gå tilbake til arket ditt og klikk som følger for å åpne Makroer dialogboks: Utvikler ➤ Makroer .
- Velg Makroen navn som spesifisert i kodene .
- Til slutt trykker du bare Kjør .
Ta en titt nå, vbNewLine viser utgangen i tolinjer .
Les mer: VBA for å generere flere linjer i e-posttekst i Excel (2 metoder)
2. Bruk vbCrLf for å lage ny linje i MsgBox Bruke VBA i Excel
Nå skal vi bruke en annen konstant på VBA – vbCrLf for å lage en ny linje i MsgBox . Det vil også legge til en ny linje mellom de to påfølgende linjene.
Trinn:
- Følg først de første to trinnene fra den første metoden for å sette inn en modul i VBA
- Deretter skriver du følgende koder i den-
6434
- Deretter følger du fjerde trinn fra den første metoden for å åpne Makro-dialogboksen .
- Velg Makronavnet og trykk Kjør .
Konstanten vbCrLf har lagt til en ny linje med en mellomrom også.
Les mer: Hvordan legge til en Linje i Excel-celle (5 enkle metoder)
3. Sett inn vbLf for å legge til ny linje i MsgBox ved hjelp av Excel VBA
La oss bruke en annen konstant- vbLf for å legge til en ny linje i MsgBox i Excel VBA.
Trinn:
- Følg de første to trinnene fra den første metoden for å sette inn en modul i VBA
- Senere skriv følgende koder i den-
6067
- Så følg det fjerde trinnet fra den første metoden for å åpne Makro-dialogboksen .
- Senere velger du Makronavnet som nevnt i kodene og trykk Kjør .
Og like etter vil du få ønsket utgang.
Les mer: Hvordan legge til ny linje med CONCATENATE-formel i Excel (5 måter)
4. Bruk Chr for å opprette ny linje i MsgBox ved å bruke VBA i Excel
Her bruker vi to konstanter av VBA- Chr(13) & Chr(10) for å legge til linjer.
Trinn:
- Begynn med å følge de første to trinnene fra den første metoden for å sette inn en modul i VBA
- Deretter skriver du følgende koder i den-
6164
- Følg deretter det fjerde trinnet fra den første metoden for å åpne Makro-dialogboksen .
- Velg deretter tildelt Makronavn og trykk Kjør .
Se at vi har fått samme utgang.
5. Legg til ny linje i makroen i Excel VBA
I de forrige metodene brøt vi ikke linjen i koden. Her vil vi bryte og legge til linjer i kodene.
Trinn:
- Følg først de første to trinnene fra den første metoden for å sette inn en modul i VBA
- Neste, skriv følgende koder i den-
1176
- Senere følger du fjerde trinn fra den første metoden for å åpne Makro-dialogboksen .
- Deretter velger du bare Makronavnet og trykker Kjør .
Nåse, at makro har lagt til en ny linje og holder en mellomrom mellom linjene.
Les mer: Hvordan gjøre et linjeskift i Excel (4 måter)
6. Bygg inn VBA for å legge til nye linjer i MsgBox ved hjelp av knappen
I vår aller siste metode vil vi gjøre oppgaven på en litt annen måte. Vi setter en knapp for å legge til linjer i MsgBox .
6.1-knapp for enkeltlinje
Først må vi vil lage en knapp for å legge til en enkelt linje. For det har jeg laget et datasett som representerer tre celler for å gi inndata Etternavn , Adresse og Telefonnummer . Når vi klikker på knappen , vil den sjekke cellene og hvis får en tom celle vil vise meldingen for den cellen.
- Klikk som følger: Utvikler ➤ Sett inn og deretter velg den rektangulære boksen fra delen Skjemakontroller .
- Snart etter vil du få et plusspålogging markøren, venstreklikk musen og dra på arket for å angi knappstørrelsen .
- Deretter høyreklikk musen på knappen og velg Rediger tekst fra kontekstmenyen for å angi knappnavnet .
- Type navnet og klikk hvor som helst på arket.
- Igjen høyreklikk din mus på knappen og velg Tildel makro fra kontekstmenyen for å angi en Makro .
- I dette øyeblikket gir du et makronavn og trykker Ny .
- Skriv deretter inn følgende koder –
7950
Kodeoversikt
- Først opprettet jeg en Underprosedyre SingleLine_Button .
- Deretter erklærte en variabel WS som Arbeidsark .
- Brukte deretter tre IF-setninger for å sjekke cellene, hvis cellen er fylt med verdi vil den ignorere den og hvis får en tom celle vil da vise tilsvarende melding gjennom MsgBox .
- Senere, bare gå tilbake til arket ditt og klikk knappen .
Siden Etternavn -feltet er tomt, er det grunnen til at det viser varselmeldingen.
- Trykk OK og så vil det sjekke det andre feltet .
Det andre feltet er tomt også, så det la til et n ny linje for å varsle det .
Her fylte jeg det første feltet og klikket på knappen, og så at den hoppet over det feltet og hoppet til det andre feltet for å vise meldingen.
6.2-knapp for flere linjer
Ved å tilordne denne knappen, vil vi kunne legge til flere linjer om gangen i meldingsboksen.
- Først følg de første 6 trinnene fraforrige seksjon for å legge til en knapp og tilordne en makro .
- Deretter skriv inn følgende koder i makroen-
4468
Kodeoversikt
- Her opprettet jeg en Underprosedyre Multiple_Line_Button .
- Deretter erklærte noen variabler WS Som Arbeidsark og Etternavn , Adresse , Telefon , Feilmelding Som
- Senere, brukt Len og Rekkevidde for å angi feltene.
- Til slutt, brukt If-setninger for å sjekke om feltene er tomme eller ikke . Hvis den er fylt, vil den hoppe over den og hvis ikke vises meldinger gjennom MsgBox .
- Til slutt, gå tilbake til arket og klikk knappen .
Og se at den viser tre linjer for de tre feltene som de alle er tomme .
Jeg fylte ut det første feltet og ser nå at det bare viser meldinger for neste 2 felter .
Les mer: Hvordan sette flere linjer i Excel-celle (2 enkle måter)
Konklusjon
Jeg håper prosedyrene beskrevet ovenfor vil være gode nok til å lage en ny linje i MsgBox ved hjelp av Excel VBA. Still gjerne spørsmål i kommentarfeltet og gi meg tilbakemelding.