Microsoft Word matnli hujjatlar yaratish uchun kuchli vosita. Uning yordami bilan siz asboblar panelidagi tegishli tugmani bosish orqali chaqirilishi mumkin bo'lgan kichik qulay taqvim yaratishingiz mumkin. Buning uchun har qanday Microsoft Office to'plami bilan birga o'rnatiladigan Microsoft Visual Basic vositalar to'plamidan foydalanishingiz kerak bo'ladi.
Ko'rsatmalar
1-qadam
Word hujjatini yarating va uni shablon sifatida saqlang. Buning uchun tegishli "Fayl" menyusi (Office 2007 va undan yuqori versiyalari uchun - yuqori chap burchakdagi Microsoft Office tugmasi) - "Yangi" - "Bo'sh hujjat", so'ngra "Saqlash" - "So'z shablonlari" dan foydalaning..
2-qadam
Alt = "Image" va F11 tugmalar birikmasini bosib Visual Basic dasturlash muhitini oching. Muharrir oynasi ochiladi, unda "F7" tugmachasini bosing.
3-qadam
Oynaning yuqori qismida "Qo'shish" - "Foydalanuvchi formasi" ni tanlang. "Asboblar" - "Qo'shimcha boshqaruv" menyusini tanlang. Ochilgan menyuda "Kalendarni boshqarish" (yoki "Kalendarni boshqarish") yonidagi katakchani belgilang. "Ok" tugmasini bosing.
4-qadam
"Asboblar qutisi" boshqaruv panelida paydo bo'lgan "Taqvim" belgisini bosing. Sichqoncha ko'rsatgichini shakl ustiga o'tkazing va taqvim uchun kerakli o'lchamdagi kvadratni torting.
5-qadam
Taqvim uchun ekran parametrlarini o'zgartirishingiz mumkin. Buning uchun oynaning chap qismida, Xususiyatlar menyusida "Custom" -ni tanlang va chiziqning o'ng qismida ellips bilan tugmani bosing. Ochilgan oynada kerakli sozlamalarni tanlang. "Shrift" va "Rang" yorlig'ida siz taqvim panelining parametrlarini o'zi tanlashingiz mumkin. Barcha sozlamalarni o'rnatgandan so'ng, "OK" tugmasini bosing.
6-qadam
Shaklning sarlavhasini bosing va "Xususiyatlar" da ("Sarlavha" qatorida) "Taqvim" nomini ko'rsatishingiz mumkin. Sarlavha o'zgaradi.
7-qadam
"Esc" tugmachasini bosib, taqvimning yopilishini tashkil qilish. Buning uchun ToolBox-dagi "CommandButton" tugmachasini tanlang, uni chizib oling. Xususiyatlar ostida Bekor qilish qiymatini rostga o'zgartiring. F7 tugmachasini bosing, "Private Sub.." va "End Sub" qatorlari orasiga "Unload Me" qatorini kiriting, so'ng "OK" tugmasini bosing.
8-qadam
Taqvimdagi joriy sanani ko'rsatish uchun "Private Sub Calendar1_Click ()" bandidan keyin kodni joylashtiring: Private Sub UserForm_Initialize ()
Taqvim 1. Bugun
Yakuniy pastki
9-qadam
Shablonda yaratilgan har qanday hujjatda taqvimni aks ettirish uchun "Qo'shish" - "Modul" buyrug'ini tanlang va quyidagilarni kiriting: Sub OpenCalendar ()
UserForm1. Show
Yakuniy pastki
10-qadam
Asboblar panelidagi "Saqlash" tugmachasini bosing (yoki "Fayl" - "Saqlash"). Siz muharrirni yopishingiz mumkin.
11-qadam
Uni sinab ko'rish uchun Word-da alt="Image" va F8 tugmachalarini bosing. "OpenCalendar" kiriting, "Ishga tushirish" tugmasini bosing. Taqvim ochiladi. Yaratilgan shablonni saqlang.
