Microsoft Word тексттик документтерди түзүүнүн күчтүү куралы. Анын жардамы менен, кичинекей ыңгайлуу календарь түзсөңүз болот, ал шаймандар панелиндеги тиешелүү баскычты чыкылдатуу менен чакырылышы мүмкүн. Бул үчүн, сизге каалаган Microsoft Office пакети менен кошо орнотулган Microsoft Visual Basic шаймандарын колдонуу керек болот.
Нускамалар
1 кадам
Word документин түзүп, шаблон катары сактаңыз. Бул үчүн "Файл" тиешелүү меню пункттарын (Office 2007 жана андан жогору версиялары үчүн - сол жактагы жогорку бурчтагы Microsoft Office баскычы) - "Жаңы" - "Бош документ", андан кийин "Башкача сактоо" - "Сөз шаблону" колдонуңуз..
2-кадам
Alt = "Image" жана F11 баскычтарын басуу менен Visual Basic программалоо чөйрөсүн ачыңыз. Редактор терезеси ачылат, анда "F7" баскычын басыңыз.
3-кадам
Терезенин жогору жагында, "Кыстаруу" - "Колдонуучунун Формасын" тандаңыз. "Куралдар" - "Кошумча башкаруу элементтери" менюсун тандаңыз. Калкыма менюдан "Календардык башкаруу" (же "Календардык башкаруу") жанындагы кутучаны белгилеңиз. "Макул" баскычын чыкылдатыңыз.
4-кадам
"Куралдар кутусу" башкаруу панелинде пайда болгон "Календар" сүрөтчөсүн чыкылдатыңыз. Чычкан көрсөткүчтү фигуранын үстүнө жылдырып, календарга керектүү өлчөмдөгү чарчы сызыңыз.
5-кадам
Жылнааманын көрсөтүү параметрлерин өзгөртө аласыз. Бул үчүн, терезенин сол бөлүгүндө, Касиеттер менюсунда, "Custom" тандап, саптын оң жагында эллипс бар баскычты чыкылдатыңыз. Калкыма терезеден керектүү орнотууларды тандаңыз. "Шрифт" жана "Түс" кошумча барагынан календардык панелдин параметрлерин өзүңүз тандай аласыз. Бардык орнотууларды жасап бүткөндөн кийин, "ОК" баскычын чыкылдатыңыз.
6-кадам
Форманын аталышын чыкылдатып, "Касиеттерде" ("Коштомо жазуу" сабында) "Календар" деген аталышты көрсөтсөңүз болот. Аталышы өзгөрүлөт.
7-кадам
"Esc" баскычын басып, календардын жабылышын уюштуруу. Бул үчүн, Куралдар панелиндеги "CommandButton" баскычын тандап, аны чийип алыңыз. Касиеттердин астында Жокко чыгаруу маанисин True кылып өзгөртүңүз. F7 баскычын басып, "Private Sub.." жана "End Sub" эки саптын арасына "Мени Жүктөө" сабын киргизип, андан кийин "ОК" баскычын чыкылдатыңыз.
8-кадам
Жылнаамада учурдагы күндү көрсөтүү үчүн, "Private Sub Calendar1_Click ()" пунктунан кийин кодду чаптаңыз: Private Sub UserForm_Initialize ()
Календар 1. Бүгүн
End Sub
9-кадам
Шаблондо түзүлгөн каалаган документте календарды көрсөтүү үчүн, "Кыстаруу" - "Модуль" командасын тандап, киргизиңиз: Sub OpenCalendar ()
UserForm1. Show
End Sub
10-кадам
Куралдар тилкесиндеги "Сактоо" баскычын чыкылдатыңыз (же "Файл" - "Сактоо"). Редакторду жапсаңыз болот.
11-кадам
Аны текшерүү үчүн Word'тогу alt="Image" жана F8 баскычтарын басыңыз. "OpenCalendar" дегенди киргизиңиз, "Иштетүүнү" чыкылдатыңыз. Жылнаама ачылат. Түзүлгөн шаблонду сактаңыз.
