Come inserire una finestra di dialogo Immagine in Excel 2007 VBA

Microsoft Excel 2007 è più di righe e colonne di dati . I suoi potenti strumenti includono formule, funzioni , grafici , tabelle pivot e filtraggio . Inoltre , Excel viene fornito con un proprio linguaggio di programmazione , Visual Basic, Applications Edition (VBA ) . Quando si registra una macro , dietro le quinte , Excel traduce i tasti premuti in codice VBA . Con l'editor di Visual Basic, è possibile modificare il codice registrato e scrivere il proprio . Utilizzare VBA per dare al vostro progetto un vantaggio professionale . Creazione di una finestra di dialogo personalizzata , poi vestire con l'immagine della vostra scelta .
Istruzioni Creare un form utente
1 Il modulo utente può includere una foto di fiori da giardino .

Aprire l'editor di Visual Basic. Fare clic su " Visual Basic " nella sezione "Codice" della scheda " sviluppatori" .
2

Selezionare Visualizza> Gestione progetti dal menu , quindi selezionare Visualizza> Proprietà.

3

selezionare Inserisci> UserForm dal menu. Vedrete un form utente vuoto e la casella degli strumenti Controlli .
4

Aggiungere una casella di testo al form. Nella casella degli strumenti Controlli , passa il mouse sopra le icone per trovare la casella di testo , che si presenta come " ab ". Fare clic sull'icona . Fare clic sul form utente di mettere la casella di testo nel modulo , posizionandolo sulla destra per lasciare spazio a una etichetta , e lasciando spazio al di sopra e al di sotto .
5

aggiungere un'etichetta al form. Trova "Etichetta" nella casella degli strumenti ( sembra una grande A) . Con lo stesso metodo , inserire un'etichetta a sinistra della casella di testo .
6

Aggiungere due pulsanti di comando . Cerca " CommandButton " nella casella degli strumenti . Utilizzare la stessa procedura per posizionare due pulsanti laterali di comando a fianco alla parte inferiore del modulo .
7

Clicca l'etichetta nel modulo utente . Nella finestra Proprietà , accanto a " Didascalia , " cambiare " Label1 " a " il tuo nome. "
8

Fare clic sulla casella di testo nel modulo utente . Nella finestra Proprietà , accanto a " ( Nome ) , " cambiamento " TextBox1 " a " name_txt . "
9

Fare clic sul primo pulsante di comando nel modulo utente . Nella finestra Proprietà , accanto a " ( Nome ) , " cambiare " CommandButton1 " a " OK_btn . " Accanto a " Didascalia , " cambiare " CommandButton1 " su "OK ".
10

Fare clic sul secondo pulsante di comando nel modulo utente . Nella finestra Proprietà , accanto a " ( Nome ) , " cambiare " CommandButton2 " a " Cancel_btn . " Accanto a " Didascalia , " cambiare " CommandButton2 " a " Annulla".
11

Aggiungere un'immagine al form utente . Nel Controlli Casella degli strumenti, fare clic sul controllo immagine, che assomiglia a due montagne e il sole. Fare clic sul form utente a posizionare la casella di immagine sulla forma .
12

Fare clic sul controllo immagine è stato inserito nel modulo utente . Nella finestra Proprietà , accanto a " Picture ", fare clic sui tre puntini ( ... ) a destra . Individuare una foto salvata sul computer, ad esempio C: \\ Users \\ Public \\ Pictures \\ Sample Pictures \\ garden.jpg per un display di fiori d'arancio . Fare doppio clic l'immagine selezionata .
13

Spostare e ridimensionare i controlli sul form utente fino a quando si è soddisfatti con il design .
Aggiungere codice ed eseguire la routine
Pagina 14 Costruire una lista di nomi sul vostro foglio di calcolo Excel .

Fare doppio clic sul pulsante "OK" sul modulo utente ad aprire una finestra del codice . Si vedrà l'inizio e le dichiarazioni finali per la subroutine
15

Aggiungi codice tra i " Private Sub " e le dichiarazioni "End Sub ", in modo che così recita : .

Privato sub OK_btn_Click ( ) per

Dim LastRow As Long

LastRow = Worksheets ( " Foglio1 " ) . Range (" A65536 " ) . End ( xlUp ) . Row + 1

cellule ( LastRow , 1) . Valore = name_txt

End Sub

Questo codice inserisce il nome dalla casella di testo nella cella A1 del foglio di calcolo Excel . Ogni volta che l' utente inserisce un nuovo nome e clicca "OK", verrà aggiunto sotto .
16

doppio clic su UserForm1 Nella finestra del progetto. Fare doppio clic sul pulsante Annulla. Nella finestra di codice , aggiungere il codice tra " Private Sub " e " End Sub ", in modo che la routine è così formulato:

Private Sub Cancel_btn_Click ( ) per

UserForm1.Hide

End Sub

Questo codice nasconde la finestra di dialogo quando l'utente fa clic su "Annulla ".
17

eseguire la routine . Selezionare Esegui > Esegui Sub /UserForm dal menu. Si tornerà a Excel e vedere la finestra di dialogo , tra cui la vostra immagine selezionata .
18

Digitare un nome nella casella di testo e fare clic su "OK". Vedrete il nome nella cella A1 . Digitare un nome e fare clic su "OK". Vedrete il nome in cella A2 .
19

su "Annulla " per nascondere la finestra di dialogo .