Excel VBA: MsgBox дээр шинэ мөр үүсгэх (6 жишээ)

Hugh West

20-06-2023 Макро & AMP; Excel VBA
  • Үүнийг Хуваалц
Hugh West

Бид кодуудыг ажиллуулсны дараа мэдэгдлийг харуулахын тулд VBA дотор MsgBox -г ихэвчлэн ашигладаг. Заримдаа нэг мөр гаралтыг зөв харуулж чаддаггүй. Дараа нь бид шинэ мөр нэмэх хэрэгтэй. Энэ нийтлэлээс та Excel VBA ашиглан MsgBox -д шинэ мөр нэмэх 6 хэрэгтэй макро сурах болно.

Дадлагын ажлын номыг татаж авах

Та Excel-ийн үнэгүй загварыг эндээс татаж аваад бие даан дасгал хийж болно.

MsgBox.xlsm-д шинэ мөр үүсгэх

6 Excel VBA ашиглан MsgBox-д шинэ мөр үүсгэх жишээ

1. MsgBox-д шинэ мөр нэмэхийн тулд vbNewLine-г ашиглана уу Excel VBA

Энд бид vbNewLine VBA Макро -д мөр нэмэхийн тулд ашиглах болно. MsgBox. Би эхний мөрөнд “ Сайн уу! ”, хоёр дахь мөрөнд “ ExcelWIKI-д тавтай морил” -г харуулах болно.

Алхам:

  • Alt + F11 дарж VBA цонхыг нээнэ.
  • Дараа нь -г дараах байдлаар товшино уу. модуль оруулах: Insert ➤ Module .

  • Дараа нь дараах кодуудыг бичнэ үү- 
3076

  • Дараа нь хуудас руугаа буцаж болон дараах байдлаар дарж -г нээнэ үү. Макро харилцах цонх: Хөгжүүлэгч ➤ Макро .

  • Макро сонгоно уу код -д заасан нэр .
  • Эцэст нь Ажиллуулах товчийг дарна уу.

Одоо хараарай, vbNewLine гаралтыг хоёрт харуулж байна.мөр .

Дэлгэрэнгүй унших: Excel дээр имэйлийн үндсэн хэсэгт олон мөр үүсгэх VBA (2 арга)

2. MsgBox-д шинэ мөр үүсгэхийн тулд vbCrLf-г ашиглана уу Excel-д VBA ашиглан

Одоо бид өөр нэг тогтмол VBA – vbCrLf -д шинэ мөр үүсгэх болно. MsgBox . Энэ нь мөн дараалсан хоёр мөрийн хооронд шинэ мөр нэмэх болно.

Алхам:

  • Эхлээд эхний хоёр алхмыг дагана уу. модулийг VBA-д оруулахын тулд
  • Дараа нь дараах кодуудыг үүнд- 
3593
<бичнэ үү. 0>
  • Дараа нь эхний аргын дөрөв дэх алхмыг дагаж Макро харилцах цонхыг нээнэ үү.
  • Сонгоно уу. Макро нэр болон Ажиллуулах -г дарна уу.

vbCrLf тогтмол нь <1 нэмсэн байна>шинэ мөр цоорхой мөр бас.

Дэлгэрэнгүй унших: Хэрхэн нэмэх вэ Excel эсийн мөр (5 хялбар арга)

3. Excel VBA-г ашиглан MsgBox-д шинэ мөр нэмэхийн тулд vbLf оруулна уу

Excel VBA-д MsgBox -д шинэ мөр нэмэхийн тулд өөр тогтмол- vbLf -г ашиглая.

Алхам:

  • эхний аргын эхний хоёр алхмыг дагана уу VBA -д модуль оруулах
  • Дараа нь дараах кодуудыг дотор нь бичнэ үү- 
5096

  • Дараа нь эхний аргын дөрөв дэх алхмыг даган Макро харилцах цонхыг нээнэ үү.
  • Дараа нь Макро нэр -г сонгоно уу.кодуудад дурьдсанчлан Run товчийг дарна уу.

Удалгүй та хүссэн гаралтыг авах болно.

Дэлгэрэнгүй унших: Excel дээр CONCATENATE томъёогоор хэрхэн шинэ мөр нэмэх (5 арга)

4. Excel-д VBA-г ашиглан MsgBox-д шинэ мөр үүсгэхийн тулд Chr ашиглана уу

Энд бид VBA-ийн хоёр тогтмолыг ашиглах болно- Chr(13) & Chr(10) мөр нэмэх.

Алхам:

  • Эхний аргын эхний хоёр алхмыг дагаж эхэл VBA-д модуль оруулахын тулд
  • Дараа нь дараах кодуудыг үүнд- 
4995

бичнэ үү.

  • Үүний дараа эхний аргын дөрөв дэх алхмыг даган Макро харилцах цонхыг нээнэ үү.
  • Дараа нь Макро нэр -г өгөөд Ажиллуулах -г дарна уу.

Бид ижил гаралттай байгааг харна уу.

5. Excel VBA дахь макро дотор шинэ мөр нэмэх

Өмнөх аргуудад бид кодын мөрийг таслаагүй. Энд бид код дотор мөрүүдийг задалж нэмнэ.

Алхам:

  • Эхлээд эхний хоёр алхамыг дагана уу. модуль оруулахын тулд VBA
  • Дараа нь дараах кодуудыг үүнд бичнэ үү- 
2707

  • Дараа нь эхний аргын дөрөв дэх алхмыг даган Макро харилцах цонхыг нээнэ үү.
  • Дараа нь Макро нэр -г сонгоод Ажиллуулах -г дарна уу.

Одоо макро нь шинэ мөр нэмсэн мөр хооронд зоорхой мөр үлдээсэн байна.

Дэлгэрэнгүй унших: Excel дээр хэрхэн мөр таслах вэ (4 арга)

6. Товч ашиглан MsgBox-т шинэ мөр нэмэхийн тулд VBA-г оруулах

Бидний хамгийн сүүлийн аргад бид даалгаврыг арай өөр аргаар хийх болно. Бид MsgBox -д мөр нэмэхийн тулд товчлуур тохируулна.

6.1 Нэг мөрөнд зориулсан товчлуур

Эхлээд бид Нэг мөр нэмэх товчийг хийх болно. Үүний тулд би Овог , Хаяг , Утасны дугаар гэсэн гурван нүдийг төлөөлөх өгөгдлийн багц хийсэн. Бид товчлуур дээр дарахад нүднүүдийг шалгах бөгөөд хоосон нүд байвал тухайн нүдний мэдээ -г харуулах болно.

  • Дараах байдлаар -г товшино уу: Хөгжүүлэгч ➤ Insert , дараа нь тэгш өнцөгт хайрцгийг<2 сонгоно уу> Маягтын хяналтын хэсгээс .

  • Удалгүй та нэмэх тэмдэг -г авна. курсороо зүүн хулганы товчлуур дээр дарж, хулганаа хуудас дээр чирч товчлуурын хэмжээг тохируулна уу.

  • Дараа нь товчлуурын хулганы хулганы баруун товчийг дараад Текст засварлах<2-ыг сонгоно уу> контекст цэснээс товчлуурын нэрийг тохируулна уу.

  • <2 гэж бичнэ үү> Нэр болон хуудасны аль ч хэсэгт товшино уу.

  • Дахин хулганы баруун товчийг өөрийн <1 товчлуурын>хулгана болон Макро -г тохируулахын тулд контекст цэснээс Макро оноох -г сонго.

  • Энэ мөчид Макро нэр өгөөд Шинэ товчийг дарна уу.

  • Дараа нь дараах кодуудыг – 
5936

Код задаргаа<2-г бичнэ үү>

  • Эхлээд би Дэд процедур SingleLine_Button үүсгэсэн.
  • Дараа нь WS хувьсагчийг <гэж зарласан. 1>Ажлын хуудас .
  • Дараа нь нүднүүдийг шалгахын тулд гурван IF мэдэгдлийг ашигласан, хэрэв нүд нь утгаар дүүрсэн бол үүнийг үл тоомсорлох болно. болон хоосон нүд авах юм бол дараа нь MsgBox -ээр дамжуулан харгалзах мессежийг харуулах болно.
  • Дараа нь, зүгээр л буцаж хуудас болон товчлуур дээр дарна уу.

Овог талбар хоосон тул мэдэгдлийн мессежийг харуулж байна.

  • OK -г дараад хоёр дахь талбарыг шалгана. .

Хоёр дахь талбар бас хоосон тул н нэмсэн. ew мөрийг мэдээлэх .

Энд би эхний талбарыг бөглөж товчлуур дээр дарахад тэр талбарыг алгассаныг харлаа. мессежийг харуулахын тулд хоёрдахь талбар руу очив.

6.2 Олон мөрийн товчлуур

Тохирох замаар Энэ товчлуурыг ашигласнаар бид мессежийн талбарт нэгэн зэрэг олон мөр нэмэх боломжтой болно.

  • Эхлээд эхний 6 алхамыг дагана уу.өмнөх хэсэгт товчлуур нэмээд макро онооно.

  • Дараа нь дараах кодуудыг макро- 
9849

Код задаргаа<2 гэж бичнэ үү>

  • Энд би Дэд процедур Олон_мөрт_товч үүсгэсэн.
  • Дараа нь зарим хувьсагчийг WS гэж зарласан. 1>Ажлын хуудас болон Овог_Нэр , Хаяг , Утас , Error_msg Учир нь
  • Дараа нь Len болон Талбаруудыг тохируулахын тулд муж.
  • Эцэст нь Хэрэв хэллэгүүд -г ашиглан талбарууд хоосон эсэхийг шалгах . Хэрэв бөглөсөн бол алгасах ба хэрэв үгүй ​​бол MsgBox -ээр дамжуулан мессежийг харуулах болно.
  • Эцэст нь хуудас руу буцах ба товчлуур дээр товшино уу.

Тэгээд энэ нь гурван талбар -ын хувьд гурван мөр харуулж байгааг харна уу. бүгд хоосон .

Би эхний талбарыг бөглөсөн бөгөөд одоо зөвхөн -д зориулсан мессежүүдийг харуулж байна. дараагийн 2 талбар .

Дэлгэрэнгүй унших: Excel нүдэнд олон мөр хэрхэн оруулах вэ (2 хялбар арга)

Дүгнэлт

Дээр дурдсан процедурууд Excel VBA ашиглан MsgBox-д шинэ мөр үүсгэхэд хангалттай байх болно гэж найдаж байна. Санал хүсэлтээ коммент хэсэгт асууж, санал хүсэлтээ үлдээнэ үү.

Өмнөх нийтлэл Excel дээрх цагаан зайг хэрхэн арилгах (6 хялбар арга)
Дараагийн бичлэг Excel-ийн нүдэн дэх тэмдэгтүүдийн тоог хэрхэн тоолох вэ (хамгийн хялбар 6 арга)

Хью Уэст бол салбартаа 10 гаруй жил ажилласан туршлагатай Excel-ийн сургагч багш, шинжээч юм. Нягтлан бодох бүртгэл, санхүүгийн чиглэлээр бакалавр, бизнесийн удирдлагын магистр зэрэгтэй. Хью багшлах сонирхолтой бөгөөд дагаж мөрдөх, ойлгоход хялбар заах өвөрмөц арга барилыг боловсруулсан. Түүний Excel-ийн мэдлэг чадвар нь дэлхий даяарх олон мянган оюутан, мэргэжилтнүүдэд ур чадвараа дээшлүүлж, ажил мэргэжлээрээ амжилт гаргахад тусалсан. Хью өөрийн блогоороо дамжуулан өөрийн мэдлэгээ дэлхийтэй хуваалцаж, Excel програмын үнэгүй зааварчилгаа, онлайн сургалтыг хувь хүмүүс болон бизнесүүдэд бүрэн дүүрэн ашиглахад нь туслах зорилгоор санал болгодог.