Microsoft Word je výkonný nástroj pro vytváření textových dokumentů. S jeho pomocí můžete vytvořit malý pohodlný kalendář, který lze vyvolat kliknutím na příslušné tlačítko na panelu nástrojů. K tomu budete muset použít sadu nástrojů Microsoft Visual Basic, která je nainstalována spolu s jakýmkoli balíkem Microsoft Office.
Instrukce
Krok 1
Vytvořte dokument Word a uložte jej jako šablonu. K tomu použijte příslušné položky nabídky „Soubor“(pro Office 2007 a vyšší - tlačítko Microsoft Office v levém horním rohu) - „Nový“- „Prázdný dokument“a poté „Uložit jako“- „Šablona Wordu“.
Krok 2
Otevřete programovací prostředí jazyka Visual Basic stisknutím kombinace kláves alt="Image" a F11. Otevře se okno editoru, ve kterém stiskněte klávesu „F7“.
Krok 3
V horní části okna vyberte „Vložit“- „Uživatelský formulář“. Vyberte nabídku „Nástroje“- „Další ovládací prvky“. V rozbalovací nabídce zaškrtněte políčko vedle položky „Ovládání kalendáře“(nebo „Ovládání kalendáře). Klikněte na „OK“.
Krok 4
Klikněte na ikonu „Kalendář“, která se zobrazí na ovládacím panelu „Sada nástrojů“. Přesuňte ukazatel myši na tvar a nakreslete čtverec velikosti, kterou potřebujete pro kalendář.
Krok 5
Můžete změnit možnosti zobrazení kalendáře. To provedete tak, že v levé části okna v nabídce Vlastnosti vyberete možnost „Vlastní“a kliknete na tlačítko se třemi tečkami v pravé části řádku. Ve vyskakovacím okně vyberte požadovaná nastavení. Na kartě „Písmo“a „Barva“můžete vybrat parametry samotného panelu kalendáře. Po provedení všech nastavení klikněte na „OK“.
Krok 6
Klikněte na název formuláře a v části „Vlastnosti“(řádek „Titulek“) můžete zadat název „Kalendář“. Název se změní.
Krok 7
Chcete-li uspořádat uzavření kalendáře stisknutím klávesy „Esc“. Chcete-li to provést, vyberte v panelu nástrojů tlačítko „CommandButton“a nakreslete ho. Změňte hodnotu ve Storno v části Vlastnosti na True. Stiskněte klávesu F7, zadejte mezi dvěma řádky „Soukromý sub..“a „Ukončit sub“řádek „Vyložit mě“a poté klikněte na „OK“.
Krok 8
Chcete-li zobrazit aktuální datum v kalendáři, vložte kód za položku „Soukromý dílčí kalendář1_Click ()“: Soukromý dílčí UserForm_Initialize ()
Kalendář 1. Dnes
End Sub
Krok 9
Chcete-li zobrazit kalendář v jakémkoli dokumentu vytvořeném v šabloně, vyberte příkaz „Vložit“- „Modul“a zadejte: Sub OpenCalendar ()
UserForm1. Show
End Sub
Krok 10
Klikněte na tlačítko „Uložit“na panelu nástrojů (nebo „Soubor“- „Uložit“). Můžete zavřít editor.
Krok 11
Chcete-li to otestovat, stiskněte v aplikaci Word alt="Obrázek" a F8. Zadejte „OpenCalendar“, klikněte na „Spustit“. Otevře se kalendář. Uložte vytvořenou šablonu.
