Dasturlarning misollari Vba. Vba dasturlash asoslari va Microsoft Office ilovasida makrolarni yaratish
Download 0.9 Mb. Pdf ko'rish
|
2.VBA dasturlash muhiti va unda ishlash
|
Hujayralar (i, 2) .Value = y (y qiymati koordinatalari (i, 2) bilan kameraga yoziladi
i = i + 1 (hisoblagich amal qiladi); x1 = x1 + shag (argument qadam kattaligi bilan o'zgartiriladi); End Fevral. Excelda ushbu so'lni ishlatish natijasida biz ikkita ustunni olamiz, ularning birinchisi x qiymatlari, ikkinchisi esa y uchun. Keyinchalik ular uchun "Excel" standarti bo'yicha jadval tayyorlanmoqda. 3-misol VBA-da, Excel 2010-dagi looplarni boshqa versiyalardagi kabi amalga oshirish uchun allaqachon ko'rsatilgan Do Do qurilishda ishlatilgan. Ustunni yaratadigan dasturni ko'rib chiqing. Har bir hujayrasida mos keladigan satr kvadratlar yoziladi. "For" formasidan foydalanib, taymerdan foydalanmasdan juda qisqa vaqt ichida yozishingiz mumkin. Avval yuqorida aytib o'tilganidek, so'l yaratishingiz kerak. Keyin kodni o'zi yozing. Biz 10 hujayra uchun qadriyatlar bizni qiziqtirgan deb hisoblaymiz. Kod shu kabi ko'rinadi. I = 1 dan 10 gacha Buyruq "Inson" tiliga tarjima qilinadi, "1dan 10gacha takrorlang". Masalan, kvadratchalar bilan ustunni olish, masalan, 1 dan 11 gacha bo'lgan barcha raqamlar bo'lsa, biz quyidagilarni yozamiz: I = 1 dan 10 gacha 1-soniya uchun. Bu erda qadam qadamdir. Bu holda, u ikkiga teng. Odatiy bo'lib, bu so'zning aylanish jarayonida yo'qligi, bu qadamning yakka ekanligini bildiradi. Olingan natijalar soni (i, 1) bo'lgan kameralarda saqlanishi kerak. Keyin bosqichning kattaligiga qarab, aylanishning har bir boshida, chiziqdagi raqam ham avtomatik tarzda oshiriladi. Shunday qilib, kodni optimallashtirish yuzaga keladi. Umuman olganda, kod quyidagicha ko'rinadi: Sub dasturi () I = 1-dan 10-qadam uchun (oddiygina yozish mumkin, i = 1 dan 10gacha) Hujayralar (i, 1) .Value = i ^ 2 (ya'ni kvadrat i qiymati hujayra (i, 1) Keyingi (bir ma'noda, taymer rolini o'ynaydi va tsiklning boshlanishini anglatadi) End Fevral. Har bir narsa, masalan, yuqorida ko'rsatmalarga rioya qilib, so'rovni yozganda va ishlaydigan bo'lsa, unda har bir aniq o'lchamdagi ustunni (bu holda 10 hujayradan iborat) olganingizda, to'g'ri bajarilgan bo'lsa. 4-misol Kundalik hayotda juda ko'p hollarda, ayrim holatlarga qarab, bitta qarorni qabul qilish yoki boshqa zarurat bor. VBA Excelda ularsiz foydalanmang. Algoritmning keyingi bosqichi oldindan belgilanadigan o'rnini tanlash o'rniga, dasturning misollaridan biri, agar ... Agar ... keyin qurilish (murakkab holatlar uchun) agar ... Keyin ... END If. Muayyan masalani ko'rib chiqing. Hujayra koordinatalari (1,1) yozish uchun Excelga makro yaratishingiz kerakligini taxmin qilamiz: 1 argument ijobiy bo'lsa; 0 argument null bo'lsa; -1 argument negativ bo'lsa. Excel uchun bunday so'l yaratish Alt va F11 tugmachalarini bosib standart usulda boshlanadi. Keyin quyidagi kod yoziladi: Sub dasturi () x = hujayralar (1, 1) .Value (bu buyruq x qiymatini koordinatalari (1, 1) bilan xujayraning mazmunini belgilaydi Agar x\u003e 0 bo'lsa, hujayralar (1, 1) .Value = 1 Agar x = 0 bo'lsa, hujayralar (1, 1) .Value = 0 Agar x<0 Then Cells(1, 1).Value = -1 End Fevral. Ibratli so'rog'ini ishlatish va Excelga argument uchun to'g'ri qiymatni olish. VBA vazifalari E'tiboringizga qaraganda, Microsoftning eng mashhur stol ustaxonasida dasturlash juda murakkab emas. Ayniqsa VBA funktsiyalaridan foydalanishni o'rgansangiz. Umuman, Excel va Word ilovalarida yozish uchun yaratilgan ushbu dasturlash tili taxminan 160 funktsiyaga ega. Ular bir nechta yirik guruhlarga bo'linadi. Bu shunday: Matematik vazifalar. Ularni argumentga qo'llash, kosinoning qiymatini, tabiiy logaritmani, to'liq sonni va boshqalarni oling. Moliyaviy vazifalar. Ularning mavjudligi va Excel dasturidan foydalanganligi sababli buxgalteriya hisobi va moliyaviy hisob-kitoblar uchun samarali vositalarni olish mumkin. Array ishlash funktsiyalari Ular orasida Array, IsArray; LBound; Ubound. Jadval uchun Excel VBA vazifalari. Bu juda ko'p sonli guruh. Masalan, Space funktsiyasini integral argümanına teng bo'lgan bo'shliqlar soni yoki ANSI kodi ichiga belgilarni tarjima qilish uchun Asc yaratish uchun funktsiyalar kiradi. Ularning barchasi keng tarqalgan bo'lib foydalaniladi va Excelda qatorlar bilan ishlashga imkon beradi, bu jadvallar bilan ishlashni sezilarli darajada osonlashtiradigan ilovalarni yaratadi. Ma'lumotlarni turi o'tkazish funktsiyalari. Misol uchun, CVar Variant ma'lumotlar turiga aylantirilib, Expression argumentining qiymatini qaytaradi. Xurmo bilan ishlash vazifalari. Ular standartni sezilarli darajada kengaytiradilar, shuning uchun WeekdayName vazifasi haftaning kunining (to'liq yoki qisman) raqamini o'z raqamiga qaytaradi. Yana foydali Timer. Kunning muayyan daqiqasiga qadar o'tgan soniyalar sonini beradi. Raqamli dalillarni turli raqamlar tizimlariga aylantirish vazifalari. Masalan, oktyabr sonning sektsional ko'rinishini beradi. Formatlashtirish funktsiyalari. Ulardan eng muhimi Formatdir. Variantning qiymatini format tavsifida ko'rsatib o'tilgan ko'rsatmalarga muvofiq formatlangan ifodali qaytaradi. va boshqalar Ushbu funktsiyalarning xususiyatlarini o'rganish va ularni qo'llash "Excel" ning qo'llanilish doirasini ancha kengaytiradi. Misol 5 Keling, murakkab muammolarni hal qilaylik. Masalan: Korxonaning haqiqiy xarajatlari hisoboti qog'oz varaqasi berilgan. Kerakli: excel jadval protsessori yordamida shablon qismini ishlab chiqish; dastlabki ma'lumotlarni to'ldirishni talab qiladigan VBA dasturini yaratish, kerakli hisob-kitoblarni bajarish va ular bilan mos keladigan shablon hujayralarni to'ldirish. Qarorlarning birini ko'rib chiqaylik. Andoza yaratish Barcha harakatlar Excelda standart varaqada amalga oshiriladi. Erkin hujayralar iste'molchi kompaniyasining nomi, xarajatlar summasi, ularning darajasi va aylanmasi haqida ma'lumot kiritish uchun ajratilgan. Hisobot tayyorlanadigan kompaniyalar soni (jamiyatlar) aniqlanmaganligi sababli, hujayralar natijalar uchun qiymatlarni kiritish va mutaxassisning to'liq ismini oldindan zahiralamaydi. Ish varag'iga yangi nom beriladi. Masalan, "O vchet". Argumentlar Avtomatik shablonni to'ldirish dasturini yozish uchun eslatmani tanlashingiz kerak. Ular o'zgaruvchilar uchun ishlatiladi: NN jadvalning joriy satr raqami; TP va TF - rejali va haqiqiy aylanma; SF va SP - amaldagi va rejalashtirilgan xarajatlar miqdori; IP va IF - rejalangan va aslida xarajatlar darajasi. Biz bir xil harflarni bildiramiz, lekin "ustun" bu ustun uchun jami yig'ilgan Itog birikmasini bilan. Masalan, ItogTP "rejalashtirilgan aylanma" nomli jadvaldagi ustunga ishora qiladi. VBA dasturlash yordamida muammoni hal qilish Taqdim etilgan belgidan foydalanib, biz og'ishlar uchun formulalarni qo'lga kiritamiz. Agar% da hisoblashni amalga oshirish zarur bo'lsa, bizda (F - P) / P * 100, va jami - (F - P) bor. Ushbu hisob-kitoblarning natijalari darhol Excel jadvalining tegishli hujayralariga kiritilishi mumkin. Fakt va prognozlar bo'yicha jamlanmalar uchun ular ItogP = ItogP + P va ItogF = ItogF + F formulalari yordamida olingan. Hisoblash foizda amalga oshirilsa va umumiy qiymat bo'yicha - (ItogF - ItogP) ishlatilsa, bu = (ItogF - ItogP) / ItogP * 100dan foydalaning. Natijalar, darhol tegishli hujayralarga yoziladi, shuning uchun ularni o'zgaruvchilarga tayinlashning hojati yo'q. Yaratilgan dasturni ishga tushirishdan oldin, masalan, "Report1.xls" deb nomlangan ish kitobini saqlashingiz kerak. "Hisobot jadvali tuzish" tugmachasi ustun ma'lumotlarini kiritganingizdan so'ng faqat bir marta bosilishi kerak. Boshqa qoidalarni bilishingiz kerak. Xususan, har bir turdagi faoliyat uchun qiymatlar jadvaliga kiritilgandan so'ng, "Qo'shish satri" tugmasi bosilishi kerak. Barcha ma'lumotlarni kiritganingizdan so'ng, "Finish" tugmachasini bosishingiz kerak va keyin "Excel" oynasiga o'ting. Keling, Excel uchun muammolarni makroslar bilan qanday hal qilishni bilasiz. "Word" da eng mashhur matn muharriri muhitida ishlash uchun VBA excel dasturini ishlatish qobiliyati talab qilinishi mumkin (dasturlarning namunalari, yuqorida). Xususan, maqolaning boshida ko'rsatilgandek yozish yoki menyudagi tugmalar yaratish uchun kod yozish orqali yozish mumkin, buning natijasida matndagi ko'plab operatsiyalar ko'rsatuvchi tugmachalarni bosish yoki ko'rish yorlig'i va Makrolar belgisi orqali amalga oshirilishi mumkin. Download 0.9 Mb. Do'stlaringiz bilan baham: 
|