fereastra de intrare este foarte similar cu fereastra de mesaj, cu excepția faptului că prima conține un câmp pentru apa unui șir de text. În caseta de intrare are două butoane instalate: OK și Cancel, și nu trebuie să vă faceți griji cu privire la definirea chei.
Aici, la fel ca și în casetele cu mesaje, trebuie să creați o funcție care va returna întreaga informație de intrare variabilă; În plus, trebuie să specificați textul care spune utilizatorul ce informații să intre. De fapt, expresia arată astfel:
Variable = InputBox ( "întrebări de utilizatori")
De exemplu, creați o variabilă numită EmployeeName, care va stoca numele de utilizator:
EmployeeName = InputBox ( "Introduceți numele dvs.")
Acest macro folosind o casetă de dialog (fig. 4.8) va ajuta la identificarea numele de utilizator.
Figura 4. 8. Caseta de intrare solicită numele de utilizator
După cum probabil ați ghicit, una din această expresie nu este suficient; trebuie să vă spun, de asemenea, programul ce să facă în continuare. Rămâne în programul ultimelor modificări mici. privi la
ceea ce ați făcut:
Application.UserName = "Ivanov Ivan Ivanovich"
Datele stocate într-o variabilă șir de caractere „deoarece textul“ nu poate fi utilizat, de exemplu, în formula, chiar dacă acestea conțin un număr sau numere. Cu toate acestea, informațiile dintr-o variabilă șir poate fi transformată într-o valoare numerică, și vice-versa. Puteți scrie un program care copiază suma de salarizare și o stochează într-o variabilă șir de caractere. Mai mult, este posibil să se scrie formula care este utilizat pentru calcularea datelor ca variabilă șir, recepționate prin fereastra de intrare. Pentru a face acest lucru, există funcția Val. În exemplul următor, șirul cu numărul nume este convertit la o valoare numerică:
În plus, o altă variabilă puteți stoca o valoare numerică pe care doriți să fie afișate în fereastra de mesaje. VBA trebuie să-l transforme într-un șir de caractere. Acest lucru se poate face cu ajutorul functiei Str. În exemplul următor, o variabilă numită Score, care are o valoare numerică este convertită într-o valoare șir:
Dar acum ești o astfel de linie nu este chiar necesar. În schimb, trebuie să utilizați valoarea stocată în EmployeeName variabilă. În cursul programului de lucru imediat ce VBA vine la această expresie, EmployeeName ar trebui să conțină deja un nume de utilizator, pe care el intră în caseta de dialog. Prin urmare, vă rugăm să dea expresie forma:
Rețineți că acum nu utilizați ghilimele. În cazul în care au existat între ghilimele, VBA ar fi perceput ca un simplu șir de caractere variabil. Și acum, când programul ajunge la această expresie, aceasta ar trebui să citească conținutul EmployeeName variabile și puneți-l în fila Informații despre utilizator din caseta de dialog Opțiuni. Forma finală a programului este următoarea:
„Macro înregistrate 12.11.07 Alex
EmployeeName = InputBox ( „Vă rugăm să introduceți numele de lână“)
Application.UserName = EmployeeName Application.Userlnitials = ""
Puteți adăuga un titlu în caseta de intrare. Este exact la fel ca atunci când se utilizează mesaj.