A VBA gombok argumentumának rugalmassága megkönnyíti az Excel üzenetdobozok testreszabását. Kiválaszthatja, hogy mely gombok jelenjenek meg, meghatározhatja, hogy megjelenjen-e ikon, és eldöntheti, hogy melyik gomb legyen az alapértelmezett (az alapértelmezett gomb „kattintása”, ha a felhasználó megnyomja az Entert).
A gombok argumentumához beépített konstansokat használhat. Ha úgy tetszik, konstans helyett használhatja az értéket (de a beépített konstansok használata sokkal egyszerűbb).
Ha ezen állandók közül egynél többet szeretne használni argumentumként, csak kösse össze őket egy + operátorral. Például egy igen és nem gombokkal, valamint egy felkiáltójellel rendelkező üzenetmező megjelenítéséhez használja a következő kifejezést második MsgBox argumentumként:
vbYesNo + vbFelkiáltójel
Vagy ha kevésbé szeretné értelmezni a kódot, használjon 52-es értéket (azaz 4 + 48).
A következő példa konstansok kombinációjával jelenít meg egy üzenetdobozt egy Igen gombbal és egy Nem gombbal (vbYesNo), valamint egy kérdőjel ikonnal (vbQuestion). A konstans vbDefaultButton2 a második gombot (No) jelöli ki alapértelmezett gombként – vagyis azt a gombot, amelyre kattint, ha a felhasználó megnyomja az Entert. Az egyszerűség kedvéért ezeket az állandókat a Config változóhoz rendeljük, majd a Config-ot használja második argumentumként az MsgBox függvényben:
Sub Get Answer3()
Dim Config As Long
Dim Ans As Integer
Config = vbYesNo + vbQuestion + vbDefaultButton2
Ans = MsgBox ("Feldolgozza a havi jelentést?", Konfiguráció)
Ha Ans = vbYes, akkor RunReport
Vége Sub
Tekintse meg az Excel üzenetdobozát, amelyet a GetAnswer3 eljárás végrehajtásakor jelenít meg. Ha a felhasználó az Igen gombra kattint, a rutin végrehajtja a RunReport nevű eljárást. Ha a felhasználó a Nem gombra kattint (vagy megnyomja az Enter billentyűt), a rutin művelet nélkül véget ér. Mivel a cím argumentum kimaradt az MsgBox függvényben, az Excel az alapértelmezett címet, a Microsoft Excelt használja.
Az MsgBox függvény gombok argumentuma határozza meg, hogy mi jelenjen meg az üzenetmezőben.
A következő rutin egy másik példa az MsgBox függvény használatára:
Sub Get Answer4() Dim Msg As String, Title As String Dim Config As Integer, Ans As Integer Msg = "Feldolgozza a havi jelentést?" Msg = Msg & vbNewLine & vbNewLine Msg = Üzenet & "A havi jelentés feldolgozása " Msg = Üzenet és „körülbelül 15 percet vesz igénybe. ez Msg = Msg & "generál egy 30 oldalas jelentést a következőhöz: " Msg = Msg & "minden értékesítési iroda a jelenlegi " Msg = Üzenet és „hónap”. Cím = „XYZ Marketing Társaság” Config = vbYesNo + vbQuestion Ans = MsgBox (üzenet, konfiguráció, cím) Ha Ans = vbYes, akkor RunReport Vége Sub
Ez a példa egy hosszabb üzenet megadásának hatékony módját mutatja be egy üzenetablakban. Egy változót (Msg) és az összefűzési operátort (&) használnak az üzenet felépítésére utasítások sorozatában. A vbNewLine konstans egy sortörés karaktert szúr be, amely új sort kezd (használja kétszer üres sor beszúrásához). A cím argumentum egy másik cím megjelenítésére szolgál az üzenetmezőben. Ez az az üzenetmező, amelyet az Excel jelenít meg az eljárás végrehajtásakor.
Ez az MsgBox funkció által megjelenített párbeszédpanel egy címet, egy ikont és két gombot jelenít meg.
Használhat konstansokat (például vbYes és vbNo) az MsgBox függvény visszatérési értékéhez. Íme néhány további állandó.
| Állandó | Érték | Mit jelent |
|---|---|---|
| vbOK | 1 | A felhasználó az OK gombra kattintott. |
| vbCancel | 2 | A felhasználó a Mégse gombra kattintott. |
| vbAbort | 3 | A felhasználó a Megszakítás gombra kattintott. |
| vbRetry | 4 | A felhasználó az Újra gombra kattintott. |
| vbIgnore | 5 | A felhasználó az Ignore gombra kattintott. |
| vbIgen | 6 | A felhasználó az Igen gombra kattintott. |
| vbNo | 7 | A felhasználó a Nem gombra kattintott. |
És nagyjából ennyit kell tudni az MsgBox funkcióról. Az üzenetdobozokat azonban óvatosan használja. Általában nincs ok arra, hogy olyan üzenetdobozokat jelenítsünk meg, amelyek nem szolgálnak célt. Például az emberek hajlamosak bosszankodni, ha minden nap egy üzenetdobozt látnak a Jó reggelt felirattal. Köszönjük, hogy betöltötte a Költségvetési előrejelzés munkafüzetet.
Lábjegyzetek és végjegyzetek létrehozása a Word 2013-ban. Részletes útmutató, hogyan készíthet különféle stílusú jegyzeteket bibliográfiai információkhoz vagy magyarázó megjegyzésekhez.
Tudjon meg mindent arról, hogyan lehet az Excelben kiemelni a statisztikailag kiugró értékeket, mégpedig egyszerű eszközökkel és módszerekkel. Kiemelt figyelmet fordítunk a kiugró értékek azonosítására és kezelésére.
Az Excel Mintavételi eszközével véletlenszerűen kiválaszthat elemeket egy adatkészletből vagy választhat minden n-edik elemet. Ismerje meg, hogyan használhatja ezt a hasznos funkciót az adatelemzéshez!
Fedezze fel a Microsoft Word 2019 legjobb trükkjeit, amelyek segítenek a hatékonyabb munkavégzésben. Tudd meg, hogyan használhatod ki a program funkcióit!
A Word 2019-ben a bekezdések igazítása és behúzása kulcsfontosságú a dokumentumok megfelelő megjelenítéséhez. Ismerje meg a formázási lehetőségeket és tippeket a hatékonyabb munkához.
Fedezze fel, hogyan használhatja az Excel 2019 Solver bővítményt a komplex problémák megoldására. A célcella, változócellák és kényszerek beállítása lépésről lépésre.
A Word lehetővé teszi dinamikus elemek hozzáadását a dokumentumhoz. Fedezze fel, hogyan lehet különböző mezőket használni a Word programban a dinamikus tartalom létrehozásához.
A SharePoint 2010 oszlopai az adatok tárolására szolgálnak. Fedezze fel a különböző oszlop típusokat és azok alkalmazását a SharePoint rendszeren belül.
A Word 2013 szövegtörlésének képessége kulcsfontosságú, legyen szó szövegalkotásról vagy törlésről. Ismerje meg a hatékony szövegtörlési módszereket!
A fotóalbum funkció a PowerPoint 2016-ban lehetővé teszi, hogy egyszerre több fényképet illesszen be egy prezentációba, megkönnyítve ezzel a többszörös képek kezelését.
