Microsoft Word to potężne narzędzie do tworzenia dokumentów tekstowych. Za jego pomocą możesz stworzyć mały wygodny kalendarz, który można wywołać klikając odpowiedni przycisk na pasku narzędzi. Aby to zrobić, musisz użyć zestawu narzędzi Microsoft Visual Basic, który jest instalowany wraz z dowolnym pakietem Microsoft Office.
Instrukcje
Krok 1
Utwórz dokument Word i zapisz go jako szablon. W tym celu należy skorzystać z odpowiednich pozycji menu „Plik” (dla pakietu Office 2007 i nowszych – przycisk Microsoft Office w lewym górnym rogu) – „Nowy” – „Pusty dokument”, a następnie „Zapisz jako” – „Szablon Worda”.
Krok 2
Otwórz środowisko programowania Visual Basic, naciskając kombinację klawiszy alt="Obraz" i F11. Otworzy się okno edytora, w którym naciśnij klawisz „F7”.
Krok 3
W górnej części okna wybierz „Wstaw” - „Formularz użytkownika”. Wybierz menu "Narzędzia" - "Dodatkowe elementy sterujące". W wyskakującym menu zaznacz pole obok „Sterowanie kalendarzem” (lub „Sterowanie kalendarzem). Kliknij OK".
Krok 4
Kliknij ikonę „Kalendarz”, która pojawia się w panelu sterowania „Przybornik”. Przesuń wskaźnik myszy na kształt i narysuj kwadrat o rozmiarze potrzebnym do kalendarza.
Krok 5
Możesz zmienić opcje wyświetlania kalendarza. Aby to zrobić, w lewej części okna, w menu Właściwości wybierz „Niestandardowy” i kliknij przycisk z wielokropkiem w prawej części linii. W wyskakującym oknie wybierz żądane ustawienia. W zakładce „Czcionka” i „Kolor” możesz wybrać parametry samego panelu kalendarza. Po dokonaniu wszystkich ustawień kliknij „OK”.
Krok 6
Kliknij tytuł formularza, aw „Właściwościach” (wiersz „Podpis”) możesz podać nazwę „Kalendarz”. Tytuł się zmieni.
Krok 7
Aby zorganizować zamknięcie kalendarza, naciśnij klawisz „Esc”. Aby to zrobić, wybierz przycisk "CommandButton" w ToolBox, narysuj go. Zmień wartość w Anuluj w obszarze Właściwości na Prawda. Naciśnij F7, wpisz pomiędzy dwoma wierszami „Private Sub..” i „End Sub” wiersz „Unload Me”, a następnie kliknij „OK”.
Krok 8
Aby wyświetlić aktualną datę w kalendarzu, wklej kod po pozycji "Private Sub Calendar1_Click ()": Private Sub UserForm_Initialize ()
Kalendarz1. Dzisiaj
Napis końcowy
Krok 9
Aby wyświetlić kalendarz w dowolnym dokumencie utworzonym na szablonie, wybierz polecenie „Wstaw” - „Moduł” i wpisz: Sub OpenCalendar ()
UserForm1. Pokaż
Napis końcowy
Krok 10
Kliknij przycisk "Zapisz" na pasku narzędzi (lub "Plik" - "Zapisz"). Możesz zamknąć edytor.
Krok 11
Aby to przetestować, naciśnij alt="Obraz" i F8 w programie Word. Wpisz „OpenCalendar”, kliknij „Uruchom”. Otworzy się kalendarz. Zapisz utworzony szablon.
