Kuidas kohandada Excel 2016 VBA sõnumikaste

VBA nuppude argumendi paindlikkus muudab Exceli sõnumikastide kohandamise lihtsaks. Saate valida, milliseid nuppe kuvada, määrata, kas ikoon kuvatakse, ja otsustada, milline nupp on vaikenupp (vaikenupul klõpsatakse, kui kasutaja vajutab sisestusklahvi).

Nuppude argumendi jaoks saate kasutada sisseehitatud konstante. Kui soovite, võite konstandi asemel kasutada väärtust (kuid sisseehitatud konstantide kasutamine on palju lihtsam).

Rohkem kui ühe konstandi kasutamiseks argumendina ühendage need lihtsalt + operaatoriga. Näiteks nuppude Jah ja Ei ning hüüumärgiga sõnumikasti kuvamiseks kasutage teise MsgBoxi argumendina järgmist avaldist:

vbYesNo + vbHüüumärk

Või kui eelistate oma koodi vähem arusaadavaks muuta, kasutage väärtust 52 (st 4 + 48).

Järgmises näites kasutatakse konstantide kombinatsiooni, et kuvada teadete kast nupu Jah ja Ei nupuga (vbYesNo) ning küsimärgiikooniga (vbQuestion). Konstant vbDefaultButton2 määrab vaikenupuks teise nupu (Ei) – see tähendab nuppu, mida klõpsatakse, kui kasutaja vajutab sisestusklahvi. Lihtsuse huvides määratakse need konstandid muutujale Config ja seejärel kasutatakse funktsiooni MsgBox teise argumendina Config:

Sub Hanki vastus3()
  Dim Config As Long
  Dim Ans täisarvuna
  Config = vbYesNo + vbQuestion + vbDefaultButton2
  Ans = MsgBox ("Kas töödelda kuuaruannet?", Config)
  Kui Ans = vbYes, siis RunReport
Lõpeta alam

Vaadake teatekasti, mida Excel kuvab, kui käivitate protseduuri GetAnswer3. Kui kasutaja klõpsab nuppu Jah, käivitab rutiin protseduuri nimega RunReport. Kui kasutaja klõpsab nuppu Ei (või vajutab sisestusklahvi), lõpeb rutiin ilma tegevuseta. Kuna funktsioonis MsgBox jäeti pealkirja argument välja, kasutab Excel vaikepealkirja Microsoft Excel.

Kuidas kohandada Excel 2016 VBA sõnumikaste

Funktsiooni MsgBox nuppude argument määrab, mis sõnumikastis kuvatakse.

Järgmine rutiin annab veel ühe näite funktsiooni MsgBox kasutamisest:

Sub Hanki vastus4()
  Hämarda sõnum stringina, pealkiri stringina
  Dim Config täisarvuna, Ans täisarvuna
  Msg = "Kas soovite kuuaruannet töödelda?"
  Msg = Msg & vbNewLine & vbNewLine
  Msg = Sõnum & "Kuuaruande töötlemine
  Msg = Sõnum & "võtab umbes 15 minutit. See "
  Msg = Msg & "loob 30-leheküljelise aruande "
  Msg = Sõnum & "kõik praegused müügikontorid"
  Msg = sõnum & "kuu".
  Pealkiri = "XYZ turundusettevõte"
  Config = vbYesNo + vbQuestion
  Ans = MsgBox (Sõnum, konfiguratsioon, pealkiri)
  Kui Ans = vbYes, siis RunReport
Lõpeta alam

See näide demonstreerib tõhusat viisi pikema sõnumi määramiseks sõnumikastis. Muutujat (Msg) ja konkatenatsioonioperaatorit (&) kasutatakse sõnumi koostamiseks lausete seerias. Konstant vbNewLine lisab reavahetuse märgi, mis alustab uut rida (kasutage seda kaks korda tühja rea ​​lisamiseks). Pealkirja argumenti kasutatakse sõnumikastis erineva pealkirja kuvamiseks. Siin on teatekast, mille Excel kuvab selle protseduuri sooritamisel.

Kuidas kohandada Excel 2016 VBA sõnumikaste

See dialoogiboks, mida kuvab funktsioon MsgBox, kuvab pealkirja, ikooni ja kaks nuppu.

Funktsiooni MsgBox tagastusväärtuseks saate kasutada konstante (nt vbYes ja vbNo). Siin on mõned muud konstandid.

Püsiv Väärtus Mida see tähendab
vbOK 1 Kasutaja klõpsas OK.
vbTühista 2 Kasutaja klõpsas Tühista.
vbAbort 3 Kasutaja klõpsas Katkesta.
vb Proovi uuesti 4 Kasutaja klõpsas nupul Proovi uuesti.
vbIgnoreeri 5 Kasutaja klõpsas Eirata.
vbJah 6 Kasutaja klõpsas Jah.
vbNo 7 Kasutaja klõpsas Ei.

Ja see on peaaegu kõik, mida peate MsgBoxi funktsiooni kohta teadma. Kasutage sõnumikaste siiski ettevaatlikult. Tavaliselt pole põhjust kuvada sõnumikaste, millel pole eesmärki. Näiteks kipuvad inimesed ärrituma, kui näevad iga päev sõnumikasti, kus on kirjas Tere hommikust. Täname eelarveprognoosi töövihiku laadimise eest.

Leave a Comment

10 näpunäidet paremateks Microsoft Teamsi koosolekuteks

10 näpunäidet paremateks Microsoft Teamsi koosolekuteks

Uurige kümmet nõuannet Microsoft Teamsiga parema koosolekukogemuse saamiseks, sealhulgas märkmete tegemine, tausta hägustamine, vaigistamine ja koosolekute salvestamine.

Kuidas Word 2013 dokumentides kommentaare üle vaadata ja kustutada

Kuidas Word 2013 dokumentides kommentaare üle vaadata ja kustutada

Lühikeses Word 2013 dokumendis saate kommentaare hõlpsalt sirvida ja uurida. Siit leiate samm-sammult, kuidas kommentaare lugeda ja eemaldada.

Kuidas parandada Word 2016 tavalist malli

Kuidas parandada Word 2016 tavalist malli

Mõnikord varitseb kurjus selles, mis peaks olema Word 2016 peamises mõistlikkuse hoidlas: tavalises mallifailis. Õpi, kuidas taastada normaalne mall ja eemaldada probleemid.

Kuidas lisada lõigu taane Word 2013-s

Kuidas lisada lõigu taane Word 2013-s

Kuidas lisada lõigu taane Word 2013-s, et luua selgem ja professionaalsem ilme. Meie juhend aitab sul lihtsasti navigeerida Wordi funktsioonide kaudu ja tutvustab esimeses reas taande ning rippuva taande lisamise viise.

Kuidas Outlook 2016-s uusi kiireid samme luua

Kuidas Outlook 2016-s uusi kiireid samme luua

Lisaks kuuele kiirtoimingule, mis kuvatakse Outlooki esmakordsel installimisel, on teil valida veelgi rohkemate Quick Step mallide hulgast.

Kustutage oma PowerPointi slaididelt pliiatsi ja esiletõstja joonised

Kustutage oma PowerPointi slaididelt pliiatsi ja esiletõstja joonised

Kui olete esitluse ajal PowerPointi slaididele joonistamiseks kasutanud pliiatsit või markerit, saate joonised järgmise esitluse jaoks salvestada või need kustutada, nii et järgmisel näitamisel alustate puhaste PowerPointi slaididega. Pliiatsi ja markeri jooniste kustutamiseks järgige neid juhiseid: joonte kustutamine […]

Stiili teegi sisu rakenduses SharePoint 2010

Stiili teegi sisu rakenduses SharePoint 2010

Style'i teek sisaldab CSS-faile, XSL-faile ja eelmääratletud mallilehtede, lehepaigutuste ja juhtelementide poolt kasutatavaid pilte rakenduses SharePoint 2010. CSS-failide leidmiseks avaldamissaidi stiiliteegist: valige saidi toimingud → vaade. Kogu saidi sisu. Ilmub saidi sisu. Style raamatukogu asub […]

Vormindage numbreid tuhandetes ja miljonites Exceli aruannetes

Vormindage numbreid tuhandetes ja miljonites Exceli aruannetes

Ärge uputage oma publikut tohutute numbritega. Microsoft Excelis saate parandada oma armatuurlaudade ja aruannete loetavust, vormindades numbrid tuhandetes või miljonites.

Kuidas SharePointi saite jagada ja jälgida

Kuidas SharePointi saite jagada ja jälgida

Siit saate teada, kuidas kasutada SharePointi suhtlusvõrgustiku tööriistu, mis võimaldavad üksikisikutel ja rühmadel suhelda, koostööd teha, jagada ja ühendada.

Kuidas teisendada kuupäevi Excelis Juliani vormingutesse

Kuidas teisendada kuupäevi Excelis Juliani vormingutesse

Julia kuupäevi kasutatakse tootmiskeskkondades sageli ajatemplina ja partiinumbri kiirviitena. Seda tüüpi kuupäevade kodeerimine võimaldab jaemüüjatel, tarbijatel ja teenindusagentidel tuvastada toote valmistamise aja ja seega toote vanuse. Juliuse kuupäevi kasutatakse ka programmeerimises, sõjaväes ja astronoomias. Erinevad […]