Macro di Visual Basic personalizzare le applicazioni di Microsoft Office , che li rende più potente, con strumenti specializzati per utenti specifici . Calendario controlla aiutare gli utenti , garantendo la qualità dei loro dati . Generazione di un calendario per la selezione della data al volo necessita di una macro di Visual Basic e di un controllo ActiveX , ActiveX visualizza il calendario e Visual Basic interpreta i comandi dell'utente sul calendario . Il codice di esempio in questo articolo si concentrerà sulla creazione di un calendario in Microsoft Excel , ma può essere adattato per qualsiasi applicazione in Microsoft Office. Istruzioni
1
lancio di Excel facendo clic su " Start", " Tutti i programmi ", "Microsoft Office " e " Excel ".
2
lanciare l'editor di Visual Basic ( VBE ), premendo il tasto " Alt " e " F11 " contemporaneamente .
3
Creare la cartella di lavoro " Personal.xls " se non esiste già . La cartella di lavoro " Personal.xls " contiene le macro che sono accessibili da ogni altra cartella di lavoro in Excel . In alto a sinistra del VBE vi è un pannello di navigazione . Se " Personal.xls " non è elencato nel pannello di navigazione VBE , fai clic su " Strumenti ", " Macro " e " Registra nuova macro . " Una finestra di dialogo apparirà sullo schermo . Selezionare "Store Macro in: Cartella macro personale " e quindi fare clic su "OK". Fare clic su " Interrompi registrazione ". La cartella di lavoro " Personal.xls " apparirà nel pannello di navigazione VBE .
4
creare il " form " che conterrà il calendario . Fare clic su " Personal.xls " per selezionare la cartella di lavoro . Fare clic su "Inserisci" e poi " modulo utente. " La finestra di dialogo " UserForm " apparirà sullo schermo. Ci sono diverse caselle di testo nella finestra di dialogo , nella casella di testo per "Nome ", cambiare il testo di " frmCalendar " e nella casella " Caption ", modificare il testo per
< br "Seleziona una data . " > 5
Aggiungere il controllo calendario alla casella degli strumenti . Fare clic su " Visualizza ", " Strumenti ", "Strumenti" e " controlli aggiuntivi ". Apparirà una finestra di dialogo con un elenco di comandi . Scorrere fino a " Controllo calendario 8.0" ( o l'ultima versione ) , fare clic per selezionarlo e quindi fare clic su "OK".
6
inserire il controllo calendario nel modulo utente. Fare clic sull'icona "Calendario di controllo" nella casella degli strumenti e quindi fare clic su nell'angolo in alto a sinistra del modulo utente. Fare clic e trascinare l' immagine del calendario nella posizione desiderata all'interno del modulo utente.
7
Creare il pulsante di uscita calendario - controllo . Fare clic sul pulsante " Command Control " nella casella degli strumenti . Spostare il tasto " x " in alto a sinistra del modulo utente. Sotto "Proprietà ", cambiare il nome in " cmdClose " e cambiare il valore di "Annulla" per "True". Premere il tasto F7 per accedere all'editor di codice . Copia e incolla il seguente codice nel VBE :
Private Sub cmdClose_Click ( ) per
Unload Me End Sub
8
Programma del calendario funzionalità. Selezionare " Calendar1 " dal menu a discesa nella parte superiore sinistra della VBE . C'è un altro menu a discesa a destra di questa lista , selezionare "Click" da questo menu. Copia e incolla il seguente codice nel VBE :
Private Sub Calendar1_Click ( )
ActiveCell.Value = Calendar1.Value
Unload Me
End Sub
9
Salvare il foglio di lavoro " Personal.xls " premendo "Ctrl" e "s" simultaneamente .
10
eseguire la macro. Fare clic sulla " x " in alto a destra per chiudere la VBE . Fare clic su una cella qualsiasi del foglio di lavoro . Premere il tasto " Alt " e "F8 " contemporaneamente . Viene visualizzata la finestra di dialogo Macro . Selezionare " Personal.xls ! OpenCalendar " e quindi fare clic su "Esegui". Viene visualizzato il controllo calendario . Clicca qualsiasi data sul calendario per scrivere quella data alla cella .
