Ako vložiť ovládací prvok Kalendár do dokumentu pomocou Macro

Visual Basic makrá prispôsobiť aplikácie balíka Microsoft Office , čo je silnejšia u špecializovaných nástrojov pre konkrétnych užívateľov . Kalendár ovláda používateľom pomôcť tým , že zaistí kvalitu svojich dát . Generovanie kalendára pre výber dátumu o behu vyžaduje Visual Basic makrá a ovládací prvok ActiveX , ActiveX zobrazuje kalendár a Visual Basic interpretuje užívateľské príkazy v kalendári . Príklad kódu v tomto článku sa zameria na vytváranie kalendára v aplikácii Microsoft Excel , ale to môže byť prispôsobený pre všetky aplikácie Microsoft Office Suite . Návod dovolená 1

spustení programu Excel kliknutím na tlačidlo " Štart " , " Všetky programy " , " Microsoft Office Suite " a " Excel " .
2

Spustite Editor jazyka Visual Basic ( VBE ) stlačením tlačidla " Alt " a " F11 " súčasne .
3

Vytvorte " Personal.xls " zošit , ak už neexistuje . " Personal.xls " zošit obsahuje makrá , ktoré sú prístupné z každého iného zošita v programe Excel . V ľavej hornej časti VBE je navigačný panel . Je - li " Personal.xls " nie je uvedený v navigačnom paneli VBE , kliknite na " Nástroje " , " Makro " a " Záznam nového makra . " Objaví sa dialógové okno na obrazovke . Vyberte " Store Makro v : osobný zošit makier " a potom kliknite na tlačidlo " OK " . Kliknite na tlačidlo " Zastaviť nahrávanie . " " Personal.xls " zošit sa teraz zobrazí v navigačnom paneli VBE .
4

Vytvorte " UserForm " , ktorá bude obsahovať kalendár . Kliknite na " Personal.xls " vyberte zošit . Kliknite na " Vložiť " a potom " UserForm . " Dialógové okno " UserForm " sa objaví na obrazovke . Existuje niekoľko textových polí v dialógovom okne " ; . Vyberte dátum " do textového poľa pre " meno " , zmeňte text " frmCalendar " a do poľa pre " Titulok " , zmeňte text

5

Pridanie ovládacieho prvku kalendára na paneli nástrojov. Kliknite na " Zobraziť " , " Toolbox " , " Nástroje " a " Ďalšie ovládacie prvky . " Objaví sa dialógové okno so zoznamom kontrol . Prejdite nadol na " Kalendár Control 8.0 " ( alebo najnovšiu verziu ) , kliknutím ho vyberte a kliknite na tlačidlo " OK " .
6

vložiť ovládací prvok kalendára do UserForm . Kliknite na ikonu " Calendar Control " v paneli nástrojov a potom kliknite na ľavý horný roh UserForm . Kliknite a pretiahnite na kalendár obraz na požadovanú pozíciu v rámci UserForm .
7

Vytvorenie tlačidla kalendárny ovládanie výstupu . Kliknite na tlačidlo " Command Control " v paneli nástrojov. Presuňte tlačidlo " x " na ľavej hornej časti UserForm . Pod " Vlastnosti " zmeniť názov na " Cmdclose " a zmeňte hodnotu " Storno " " To je pravda . " Stlačením tlačidla F7 otvorte editor kódu . Skopírujte a vložte nasledujúci kód do VBE :

Private Sub cmdClose_Click ( )

Vyložte mi

End Sub
8

programu kalendárneho funkčnosť . Zvoľte " Calendar1 " z rozbaľovacej ponuke v ľavej hornej časti VBE . Tam je ďalší drop - down menu na pravej strane tohto zoznamu , vyberte " Click " z tohto menu . Skopírujte a vložte nasledujúci kód do VBE :

Private Sub Calendar1_Click ( )

ActiveCell.Value = Calendar1.Value

Vyložte mi

End Sub
9

Uložiť " Personal.xls " list stlačením tlačidla " Ctrl " a " s " súčasne .
10

spustite makro . Kliknite na tlačidlo " x " v pravom hornom rohu zatvorte VBE . Kliknite na ľubovoľnú bunku na liste . Stlačte tlačidlo " Alt " a " F8 " súčasne . Objaví sa dialógové okno Makrá . Vyberte " OpenCalendar Personal.xls ! " A potom kliknite na tlačidlo " Spustiť " . Objaví sa ovládacie kalendár . Kliknite na ľubovoľné dátum v kalendári napísať tento dátum do bunky .

• Predchádzajúca strana: Ako hrať MP3 pomocou MMControl v jazyku Visual Basic 
• Ďalšia strana: O VB Runtime Chyba 462