Excel VBA: Creu Llinell Newydd yn MsgBox (6 Enghraifft)

Hugh West

20-06-2023 Macros & Excel VBA
  • Rhannu Hwn
Hugh West

Rydym yn aml yn defnyddio MsgBox yn VBA i ddangos yr hysbysiad ar ôl rhedeg y codau. Weithiau ni all llinell sengl ddangos yr allbwn yn iawn. Yna mae angen ychwanegu llinellau newydd . Felly o'r erthygl hon, byddwch yn dysgu 6 Macros defnyddiol i ychwanegu llinell newydd yn MsgBox gan ddefnyddio Excel VBA.

Lawrlwytho Llyfr Gwaith Ymarfer

Gallwch lawrlwytho'r templed Excel rhad ac am ddim yma ac ymarfer ar eich pen eich hun.

Creu Llinell Newydd yn MsgBox.xlsm

>6 Enghraifft i Greu Llinell Newydd yn MsgBox Gan Ddefnyddio Excel VBA

1. Defnyddiwch vbNewLine i Ychwanegu Llinell Newydd yn MsgBox Gan ddefnyddio Excel VBA

Yma, byddwn yn defnyddio vbNewLine yn VBA Macro i ychwanegu llinell yn MsgBlwch. Byddaf yn dangos “ Helo! ” yn y llinell gyntaf a “ Croeso i ExcelWIKI” yn yr ail linell.

Camau:

  • Pwyswch Alt + F11 i agor y ffenestr VBA .
  • Yna cliciwch fel a ganlyn i mewnosod modiwl: Mewnosod ➤ Modiwl .

  • Yn ddiweddarach, teipiwch y codau canlynol ynddo- 
7282

>
  • Yna ewch yn ôl i'ch dalen a cliciwch fel a ganlyn i agor y Macros blwch deialog: Datblygwr ➤ Macros .

  • Dewiswch y Macro enw fel y nodir yn y codau .
  • Yn olaf, pwyswch Rhedeg .

    • 0> Edrychwch nawr, mae vbNewLine yn dangos yr allbwn mewn daullinellau .

    Darllen Mwy: VBA i Gynhyrchu Llinellau Lluosog mewn Corff E-bost yn Excel (2 Ddull)

    2. Defnyddiwch vbCrLf i Greu Llinell Newydd yn MsgBox Gan ddefnyddio VBA yn Excel

    Nawr byddwn yn defnyddio cysonyn arall o VBA – vbCrLf i greu llinell newydd yn MsgBlwch . Bydd hefyd yn ychwanegu llinell newydd rhwng y ddwy linell olynol.

    Camau:

    • Yn gyntaf, dilynwch y ddau gam cyntaf o'r dull cyntaf i fewnosod modiwl yn y VBA
    • Yna ysgrifennwch y codau canlynol ynddo- 
    8545

    • Nesaf, dilynwch y pedwerydd cam o'r dull cyntaf i agor y blwch deialog Macro .
    • Dewiswch yr Enw Macro a phwyswch Rhedeg .

    Mae'r cysonyn vbCrLf wedi ychwanegu llinell newydd gyda llinell fwlch hefyd.

    Darllen Mwy: Sut i Ychwanegu a Llinell mewn Cell Excel (5 Dull Hawdd)

    3. Mewnosod vbLf i Ychwanegu Llinell Newydd yn MsgBox Gan Ddefnyddio Excel VBA

    Gadewch i ni ddefnyddio cysonyn arall- vbLf i ychwanegu llinell newydd yn MsgBox yn Excel VBA.

    Camau:

    • Dilynwch y ddau gam cyntaf o'r dull cyntaf i fewnosod modiwl yn y VBA
    • Yn ddiweddarach, ysgrifennwch y codau canlynol ynddo- 
    2938

    • Yna dilynwch y pedwerydd cam o'r dull cyntaf i agor y blwch deialog Macro .
    • Yn ddiweddarach, dewiswch yr Enw Macro fel y crybwyllwyd yn y codau a phwyswch Rhedeg .

    Ac yn fuan wedyn fe gewch yr allbwn a ddymunir.

    24>

    Darllen Mwy: Sut i Ychwanegu Llinell Newydd gyda Fformiwla CONCATENATE yn Excel (5 Ffordd)

    4. Cymhwyso Chr i Greu Llinell Newydd yn MsgBox Gan ddefnyddio VBA yn Excel

    Yma, byddwn yn defnyddio dau gysonyn o VBA- Chr(13) & Chr(10) i ychwanegu llinellau.

    Camau:

    • Dechrau gyda dilyn y ddau gam cyntaf o'r dull cyntaf i fewnosod modiwl yn y VBA
    • Yna ysgrifennwch y codau canlynol ynddo- 
    5763

    • Ar ôl hynny dilynwch y pedwerydd cam o'r dull cyntaf i agor y blwch deialog Macro .
    • Yna dewiswch y wedi'i aseinio Enw Macro a phwyswch Rhedeg .

    Gweler ein bod wedi cael yr un allbwn.

    5. Ychwanegu Llinell Newydd o fewn y Macro yn Excel VBA

    Yn y dulliau blaenorol, ni wnaethom dorri'r llinell yn y cod. Yma, byddwn yn torri ac yn ychwanegu llinellau o fewn y codau.

    Camau:

    • Yn gyntaf, dilynwch y ddau gam cyntaf o'r dull cyntaf i fewnosod modiwl yn y VBA
    • Nesaf, ysgrifennwch y codau canlynol ynddo- 
    5224

    • Yn ddiweddarach, dilynwch y pedwerydd cam o'r dull cyntaf i agor y blwch deialog Macro .
    • Yna dewiswch Enw Macro a gwasgwch Rhedeg .

    Nawrgweld, bod macro wedi ychwanegu llinell newydd gan gadw llinell fwlch rhwng y llinellau.

    Darllen Mwy: Sut i Wneud Toriad Llinell yn Excel (4 Ffordd)

    6. Mewnosod VBA i Ychwanegu Llinellau Newydd yn MsgBox Gan Ddefnyddio Botwm

    Yn ein dull olaf un, byddwn yn gwneud y dasg mewn ffordd ychydig yn wahanol. Byddwn yn gosod botwm i ychwanegu llinellau yn MsgBox .

    6.1 Botwm ar gyfer Llinell Sengl

    Yn gyntaf, rydym yn Bydd yn gwneud botwm ar gyfer ychwanegu llinell sengl. Ar gyfer hynny, rwyf wedi gwneud set ddata sy'n cynrychioli tair cell i roi mewnbwn Enw Diwethaf , Cyfeiriad , a Rhif ffôn . Pan fyddwn yn clicio ar y botwm , bydd yn gwirio'r celloedd ac os caiff gell wag yna bydd yn dangos y neges ar gyfer y gell honno.

    0>
  • Cliciwch fel a ganlyn: Datblygwr ➤ Mewnosodwch ac yna dewiswch y blwch hirsgwar o'r adran Rheolyddion Ffurflen .

    • Yn fuan wedyn, byddwch yn cael arwydd plws i mewn eich cyrchwr, cliciwch ar y chwith eich llygoden a llusgwch ar y ddalen i osod maint y botwm .
    0>
    • Yna de-gliciwch eich llygoden ar y botwm a dewiswch Golygu Testun o ddewislen cyd-destun i osod enw'r botwm .

    • Math>yr Enw a chliciwch unrhyw le ar y ddalen.

    • Eto cliciwch ar y dde eich llygoden ar y botwm a dewiswch Aseinio Macro o'r ddewislen cyd-destun i osod Macro .

    10>
  • Ar hyn o bryd, rhowch enw Macro a phwyswch Newydd .

      • Yna teipiwch y codau canlynol –
    1598

    Dadansoddiad Cod<2

    • Yn gyntaf, creais Is-weithdrefn SingleLine_Button .
    • Yna datganais newidyn WS fel Taflen waith .
    • Yna defnyddio tri datganiad IF i wirio'r celloedd, os yw'r gell wedi'i llenwi â gwerth yna bydd yn ei hanwybyddu ac os yn cael cell wag yna bydd yn dangos y neges gyfatebol trwy MsgBox .
    • Yn ddiweddarach, dim ond ewch yn ôl i'ch dalen a cliciwch y botwm .

    Gan fod y maes Enw Diwethaf yn wag dyna pam ei fod yn dangos y neges hysbysu.

    • Pwyswch OK ac yna bydd yn gwirio'r ail faes .

    Mae ail faes yn wag hefyd felly ychwanegodd n ew line i'w hysbysu .

    Yma, llenwais y maes cyntaf a chlicio ar y botwm, a gweld ei fod wedi hepgor y maes hwnnw a neidio i'r ail faes i ddangos y neges.

    6.2 Botwm ar gyfer Llinellau Lluosog

    Trwy aseinio y botwm hwn, byddwn yn gallu ychwanegu llinellau lluosog ar y tro yn y blwch neges.

    • Yn gyntaf, dilynwch y 6 cham cyntaf o'radran flaenorol i ychwanegu botwm ac aseinio macro .

    >
  • Yna teipiwch y codau canlynol yn y macro- 
    • 3372

    Dadansoddiad Cod<2

    • Yma, creais Is-weithdrefn Multiple_Line_Button .
    • Yna datganais rai newidynnau WS Fel 1>Taflen waith a Olaf_Enw , Cyfeiriad , Ffôn , Gwall_msg Fel
    • Yn ddiweddarach, defnyddiwyd >Len a Amrediad i osod y meysydd.
    • Yn olaf, defnyddiwch Os datganiadau i wirio a yw y meysydd yn wag ai peidio . Os yw wedi'i lenwi bydd yn ei hepgor ac os na, bydd yn dangos negeseuon trwy MsgBox .
    • Yn olaf, dim ond dychwelwch i'r ddalen a cliciwch y botwm .

    A gwelwch ei fod yn dangos tair llinell ar gyfer y tri maes fel y maent i gyd yn wag .

    Llenwais y maes cyntaf a nawr gwelwch, dim ond negeseuon ar gyfer y mae'n eu dangos 2 faes nesaf .

    Darllen Mwy: Sut i Roi Llinellau Lluosog yn Excel Cell (2 Ffordd Hawdd)

    Casgliad

    Gobeithiaf y bydd y gweithdrefnau a ddisgrifir uchod yn ddigon da i greu llinell newydd yn MsgBox gan ddefnyddio Excel VBA. Mae croeso i chi ofyn unrhyw gwestiwn yn yr adran sylwadau a rhowch adborth i mi.

    Post blaenorol Sut i gael gwared ar le gwyn yn Excel (6 Ffordd Hawdd)
    Post nesaf Sut i Gyfrif Nifer y Cymeriadau mewn Cell yn Excel (6 Ffordd Hawsaf)

    Mae Hugh West yn hyfforddwr a dadansoddwr Excel hynod brofiadol gyda dros 10 mlynedd o brofiad yn y diwydiant. Mae ganddo radd Baglor mewn Cyfrifeg a Chyllid a gradd Meistr mewn Gweinyddu Busnes. Mae gan Hugh angerdd am addysgu ac mae wedi datblygu dull addysgu unigryw sy’n hawdd ei ddilyn a’i ddeall. Mae ei wybodaeth arbenigol o Excel wedi helpu miloedd o fyfyrwyr a gweithwyr proffesiynol ledled y byd i wella eu sgiliau a rhagori yn eu gyrfaoedd. Trwy ei flog, mae Hugh yn rhannu ei wybodaeth gyda’r byd, gan gynnig tiwtorialau Excel am ddim a hyfforddiant ar-lein i helpu unigolion a busnesau i gyrraedd eu llawn botensial.