Jūs varat izmantot InputBox funkcija iekšā Excel VBA lai pamudinātu lietotāju ievadīt vērtību. Ievietojiet komandas pogu savā darblapā un pievienojiet šādas koda rindiņas:
1. Vispirms deklarējiet Variant tipa mainīgo myValue.
Dim myValue kā variants
Piezīme: mēs šeit izmantojam Variant tipa mainīgo, jo Mainīgais Variant var saturēt jebkura veida vērtības. Tādā veidā lietotājs var ievadīt tekstu, ciparus utt.
2. Lai parādītu ievades lodziņu, pievienojiet šādu koda rindiņu.
myValue = InputBox ("Sniedziet man kādu ievadi")
3. Ierakstiet myValue vērtību šūnā A1.
Diapazons ("A1"). Vērtība = myValue
Rezultāts, kad lietotājs ievada vērtību 5 un noklikšķina uz pogas Labi.
4. Funkcijai InputBox ir vairāk izvēles argumentu. Nākamā koda rindiņa parāda ievades lodziņu, kura virsrakstjoslā tiek parādīts nosaukums, un tam ir noklusējuma vērtība. Noklusējuma vērtība tiks izmantota, ja netiks sniegta cita ievade.
myValue = InputBox ("Sniedziet man kādu ieguldījumu", "Sveiki", 1)
Rezultāts, kad lietotājs noklikšķina tikai uz pogas Labi.
Piezīme. Novietojiet kursoru uz InputBox Visual Basic redaktorā un noklikšķiniet uz F1, lai saņemtu palīdzību par citiem izvēles argumentiem.
