MsgBox funkcija iekšā Excel VBA var atgriezt rezultātu, bet vienkārša MsgBox nevar.
Situācija:
Ievietojiet komandas pogu savā darblapā un pievienojiet šādas koda rindiņas:
1. Pirmkārt, mēs deklarējam mainīgo, ko sauc par veselu skaitļa atbildi.
Blāva atbilde Kā vesels skaitlis
2. Mēs izmantojam funkciju MsgBox, lai inicializētu mainīgo atbildi ar lietotāja ievadi.
Funkcijai MsgBox, izmantojot iekavas, ir trīs argumenti. Pirmā daļa tiek izmantota ziņojumam ziņojumu lodziņā. Izmantojiet otro daļu, lai norādītu, kuras pogas un ikonas vēlaties parādīt ziņojumu lodziņā. Trešā daļa tiek parādīta ziņojumu lodziņa virsrakstjoslā.
atbilde = MsgBox ("Vai tiešām vēlaties iztukšot lapu?", vbJāNē + vbjautājums, "Tukša lapa")
Piezīme. Novietojiet kursoru uz vbYesNo Visual Basic redaktorā un noklikšķiniet uz F1, lai redzētu, kuras citas pogas un ikonas varat izmantot. Konstantu vbYesNo un vbQuestion vietā varat izmantot arī atbilstošās vērtības 4 un 32.
3. Ja lietotājs noklikšķina uz pogas Jā, Excel VBA iztukšo lapu. Ja lietotājs noklikšķina uz pogas Nē, nekas nenotiek. Lai to panāktu, pievienojiet šādas koda rindiņas.
Ja atbilde = vbJā Tad
Šūnas. Skaidrs saturs
Citādi
'neko nedarīt
Beigas Ja
4. Lapā noklikšķiniet uz komandas pogas.
5. Noklikšķiniet uz Jā.
Rezultāts:
