Змест
Мы часта выкарыстоўваем MsgBox у VBA , каб паказаць апавяшчэнне пасля запуску кодаў. Часам адзін радок не можа правільна паказаць вывад. Затым нам трэба дадаць новыя радкі . Такім чынам, з гэтага артыкула вы даведаецеся 6 карысных макрасаў для дадання новага радка ў MsgBox з дапамогай Excel VBA.
Спампаваць Практычны сшытак
Вы можаце загрузіць бясплатны шаблон Excel адсюль і папрактыкавацца самастойна.
Стварыце новы радок у MsgBox.xlsm
6 прыкладаў стварэння новага радка ў MsgBox з дапамогай Excel VBA
1. Выкарыстоўвайце vbNewLine, каб дадаць новы радок у MsgBox з дапамогай Excel VBA
Тут мы будзем выкарыстоўваць vbNewLine у VBA Macro , каб дадаць радок у MsgBox. Я пакажу « Прывітанне! » у першым радку і « Вітаем у ExcelWIKI» у другім радку.
Крокі:
- Націсніце Alt + F11 , каб адкрыць акно VBA .
- Затым націсніце , як паказана ніжэй устаўце модуль: Уставіць ➤ Модуль .
- Пазней увядзіце ў яго наступныя коды-
9834
- Затым вярніцеся да вашага аркуша і націсніце як паказана ніжэй, каб адкрыць Дыялогавае акно Macros : Распрацоўшчык ➤ Macros .
- Абярыце macro імя , як паказана ў кодах .
- Нарэшце, проста націсніце Выканаць .
Цяпер паглядзіце, vbNewLine паказвае вынік праз дварадкоў .
Больш падрабязна: VBA для стварэння некалькіх радкоў у целе электроннай пошты ў Excel (2 метады)
2. Выкарыстоўвайце vbCrLf для стварэння новага радка ў MsgBox з дапамогай VBA ў Excel
Цяпер мы будзем выкарыстоўваць іншую канстанту VBA – vbCrLf для стварэння новага радка ў MsgBox . Ён таксама дадасць новы радок паміж двума паслядоўнымі радкамі.
Крокі:
- Спачатку выканайце першыя два крокі з першага метаду каб уставіць модуль у VBA
- Затым напішыце наступныя коды ў ім-
9326
- Далей выканайце чацвёрты крок з першага метаду , каб адкрыць дыялогавае акно макраса .
- Выберыце Назва макраса і націсніце Выканаць .
Канстанта vbCrLf дадала новы радок з разрыўным радком таксама.
Дадатковая інфармацыя: Як дадаць Радок у ячэйцы Excel (5 простых метадаў)
3. Устаўце vbLf, каб дадаць новы радок у MsgBox з дапамогай Excel VBA
Давайце выкарыстаем іншую канстанту - vbLf каб дадаць новы радок у MsgBox у Excel VBA.
Крокі:
- Выканайце першыя два крокі з першага метаду , каб уставіць модуль у VBA
- Пазней напішыце наступныя коды ў ім-
8534
- Затым выканайце чацвёрты крок з першага спосабу , каб адкрыць дыялогавае акно макраса .
- Пазней выберыце назву макраса як паказана ў кодах, і націсніце Выканаць .
І неўзабаве пасля гэтага вы атрымаеце жаданы вынік.
Дадатковая інфармацыя: Як дадаць новы радок з формулай CONCATENATE ў Excel (5 спосабаў)
4. Прымяніць Chr для стварэння новага радка ў MsgBox з дапамогай VBA ў Excel
Тут мы будзем выкарыстоўваць дзве канстанты VBA- Chr(13) & Chr(10) каб дадаць радкі.
Крокі:
- Пачніце з выканання першых двух крокаў з першага метаду каб уставіць модуль у VBA
- Затым напішыце наступныя коды ў ім-
8939
- Пасля гэтага выканайце чацвёрты крок з першага метаду , каб адкрыць дыялогавае акно макраса .
- Затым выберыце прызначаецца Назва макраса і націсніце Выканаць .
Паглядзіце, што мы атрымалі аднолькавы вынік.
5. Дадайце новы радок у макрас у Excel VBA
У папярэдніх метадах мы не разбівалі радок у кодзе. Тут мы разбяром і дадамо радкі ў коды.
Крокі:
- Спачатку выканайце першыя два крокі з першага метаду каб уставіць модуль у VBA
- Далей напішыце наступныя коды ў ім-
2234
- Пазней выканайце чацвёрты крок з першага метаду , каб адкрыць дыялогавае акно макраса .
- Затым проста выберыце Назва макраса і націсніце Выканаць .
Заразбачыце, што макрас дадаў новы радок з захаваннем прабелу паміж радкамі.
Дадатковая інфармацыя: Як зрабіць разрыў радка ў Excel (4 спосабы)
6. Убудаваць VBA для дадання новых радкоў у MsgBox з дапамогай кнопкі
У нашым апошнім метадзе мы выканаем задачу крыху па-іншаму. Мы ўсталюем кнопку для дадання радкоў у MsgBox .
6.1 Кнопка для аднаго радка
Спачатку мы Зробім кнопку для дадання аднаго радка. Для гэтага я стварыў набор даных, які прадстаўляе тры ячэйкі для ўводу Прозвішча , Адраса і Нумар тэлефона . Калі мы націснем кнопку кнопку , яна праверыць ячэйкі і калі атрымае пустую ячэйку , пакажа паведамленне для гэтай ячэйкі.
- Націсніце наступным чынам: Распрацоўшчык ➤ Уставіць , а затым выберыце прамавугольнае поле з раздзела Элементы кіравання формамі .
- Неўзабаве пасля гэтага вы атрымаеце знак плюс ваш курсор, пстрыкніце левай кнопкай мышы і перацягніце на лісце , каб усталяваць памер кнопкі .
- Затым пстрыкніце правай кнопкай мышы мышкай на кнопцы і выберыце Рэдагаваць тэкст з кантэкстнага меню , каб усталяваць назву кнопкі .
- Тып Імя і пстрыкніце ў любым месцы аркуша.
- Зноў пстрыкніце правай кнопкай мышы ваш мышкай на кнопцы і абярыце Прызначыць макрас з кантэкстнага меню каб усталяваць Макрас .
- У гэты момант дайце назву макра і націсніце Новы .
- Затым увядзіце наступныя коды –
6885
Разбіўка кода
- Спачатку я стварыў падпрацэдуру SingleLine_Button .
- Затым аб'явіў зменную WS як Працоўны аркуш .
- Затым выкарыстаў тры сказары КАЛІ для праверкі ячэек, калі ячэйка запоўнена значэннем , яна будзе ігнараваць яе і калі атрымлівае пустую ячэйку , то пакажа адпаведнае паведамленне праз MsgBox .
- Пазней, проста вярніцеся да вашага аркуша і націсніце на кнопку .
Паколькі поле Прозвішча пустое, таму яно паказвае апавяшчэнне.
- Націсніце ОК , і потым будзе праверана другое поле .
Другое поле таксама пустое , таму ў ім дададзена н новы радок, каб паведаміць пра гэта .
Тут я запоўніў першае поле і націснуў кнопку, і бачу, што гэта поле прапушчана і перайшоў да другога поля , каб паказаць паведамленне.
6.2 Кнопка для некалькіх радкоў
Прызначаючы гэту кнопку, мы зможам дадаць некалькі радкоў адначасова ў поле паведамлення.
- Спачатку выканайце першыя 6 крокаў зпапярэдні раздзел , каб дадаць кнопку і прызначыць макрас .
- Затым увядзіце наступныя коды ў макра-
2365
Разбіўка кода
- Тут я стварыў Sub працэдуру Multiple_Line_Button .
- Затым абвясціў некаторыя зменныя WS Як Працоўны ліст і Прозвішча , Адрас , Тэлефон , Памылка_паведамлення Як
- Пазней, выкарыстоўвалася Len і Range , каб задаць палі.
- Нарэшце, выкарыстоўвалі Аператары If , каб праверыць, палі пустыя ці не . Калі ён запоўнены, ён будзе прапушчаны, а калі не, то будуць паказвацца паведамленні праз MsgBox .
- Нарэшце, проста вярніцеся да аркуша і націсніце на кнопку .
І ўбачыце, што ён паказвае тры радкі для трох палёў , як яны усе пустыя .
Я запоўніў першае поле і цяпер бачу, што яно паказвае паведамленні толькі для наступныя 2 палі .
Больш падрабязна: Як размясціць некалькі радкоў у ячэйцы Excel (2 простыя спосабы)
Выснова
Я спадзяюся, што апісаныя вышэй працэдуры будуць дастаткова добрымі для стварэння новага радка ў MsgBox з дапамогай Excel VBA. Не саромейцеся задаваць любыя пытанні ў раздзеле каментарыяў і дайце мне водгук.