Con Excel, puoi utilizzare Visual Basic per aggiungere una gamma di funzionalità diverse ai tuoi fogli di calcolo, tra cui "UserForms". Tramite UserForms, puoi visualizzare all'utente un modulo di input separato dal foglio di lavoro principale, che è utile per acquisire dati da persone che potrebbero non avere familiarità con i fogli di calcolo. Con un po 'di codice Visual Basic, puoi aggiungere tutti questi dati al tuo foglio di calcolo in nuove righe.
Definisci i tuoi campi
Avvia Excel. Immettere i nomi di tutti i campi che si desidera acquisire nella riga superiore, iniziando da "A1" e procedendo verso destra. Fai clic su "Sviluppatore", quindi su "Visual Basic". Verrà visualizzata la finestra di Visual Basic. Fare clic sull'icona "A" dalla casella degli strumenti, quindi fare clic e trascinare all'interno della finestra "UserForm1" nella posizione in cui si desidera posizionare il primo campo del modulo. Modifica l'etichetta modificando la proprietà "Didascalia" in qualcosa di più descrittivo, ad esempio "Nome", ad esempio. Crea un'etichetta per ciascuno dei campi inseriti nel foglio di lavoro.
Aggiungi le tue caselle di testo
Seleziona l'icona "TextBox" dalla casella degli strumenti e trascina una casella di testo a destra della prima etichetta. Se utilizzerai solo pochi campi, è accettabile lasciare la proprietà "(Nome)" come "TextBox1" predefinito. Tuttavia, se hai bisogno di un gran numero di campi, questo potrebbe creare confusione, quindi dovresti modificarli in modo che corrispondano alle etichette che hai già creato. Assicurati che ogni etichetta abbia una casella di testo corrispondente.
Aggiungi un pulsante di invio
Fai clic sull'icona "Pulsante di comando" nella Casella degli strumenti, che assomiglia a un pulsante standard in stile Windows. Fai clic e trascinalo nella dimensione e posizione richieste in UserForm1. In genere, ti consigliamo questo sotto o vicino alla casella di testo finale nel modulo. Cambia la proprietà "Didascalia" del pulsante in "Invia dati" "O qualcosa di simile, indicando all'utente che è necessario fare clic su questo pulsante per inviare i propri dati.
Aggiungi codice Visual Basic
Fare doppio clic sul pulsante. Inserisci il seguente codice tra “Sottotitoli privati” e “Sottotitoli”: eRow = Sheet1.Cells (Rows.Count, 1) .End (xlUp) .Offset (1,0) .Row Quindi avvia una nuova riga sotto questa e quindi inserisci quanto segue: Celle (erow, 1) = TextBox1.Text Se hai rinominato le caselle di testo, cambia "TextBox1" con il nome che hai assegnato alla prima casella di testo. Fallo per ogni casella di input che hai creato, avviando una nuova riga e inserendo i nomi corretti della casella di testo, come appropriato. Inoltre, per ogni nuova riga, incrementa la cifra tra parentesi di una. Ad esempio, la riga successiva potrebbe apparire così: Celle (erow, 2) = TextBox2.Text Fai clic sul pulsante "Riproduci" nella parte superiore della finestra per avviare l'acquisizione dei dati.
Computer © www.354353.com