Che cos'è VBA TextBox in Excel?
VBA TextBox è uno dei molti controlli dai controlli UserForm in Excel. VBA TextBox può tornare utile quando si desidera ricevere input dall'utente come nome, età, indirizzo, stipendio, ecc. Utilizzando il controllo TextBox, è possibile consentire agli utenti di immettere questo tipo di informazioni e di risparmiare gran parte del proprio tempo, nonché errori di battitura . VBA TextBox può essere costituito da dati statici o dinamici.
UserForm stesso è uno strumento molto utile che ha diverse opzioni di controllo come TextBox, MsgBox e InputBox, ecc. Che forniscono un modo più pratico per ottenere dati dall'utente in modo che tu possa elaborare funzionalmente quei dati e scoprirne alcune utili intuizioni .
In questo articolo, otterrai un'esperienza pratica su Excel VBA TextBox.
Esempi di Excel VBA TextBox
Di seguito sono riportati i diversi esempi di VBA TextBox in Excel.
Puoi scaricare questo modello VBA TextBox Excel qui - Modello VBA TextBox ExcelEsempio n. 1 - Come inserire TextBox in VBA?
Di seguito sono riportati i passaggi per inserire TextBox in Excel VBA.
Passaggio 1: apri un file Excel e premi Alt + F11 per passare al riquadro VBA.
Passaggio 2: Come abbiamo già discusso, TextBox è un'opzione disponibile in UserForm. Quindi dobbiamo inserire UserForm in VBE. Vai al menu Inserisci > Fai clic su Form utente .
Passaggio 3: Non appena si inserisce un form utente in VBA è possibile visualizzare un'opzione Casella degli strumenti ad esso associata e avere diverse opzioni associate al form utente.
Passaggio 4: in questa casella degli strumenti selezionare TextBox .
Passaggio 5: trascinare questo TextBox sul modulo utente.
Passaggio 6: Premi F4 per visualizzare le proprietà di UserForm (in alternativa puoi farlo facendo clic con il tasto destro del mouse su UserForm inserito). Queste proprietà ti consentono di apportare alcune modifiche necessarie come cambiare il nome di UserForm per poter accedervi facilmente.
Alcune altre modifiche di base che puoi fare con il riquadro delle proprietà di UserForm sono come cambiare il carattere, cambiare la dimensione, ecc.
Passaggio 7: inserisci il testo come “ Benvenuto in VBA TextBox! "In TextBox in UserForm.
Ecco come è possibile creare un TextBox VBA.
Esempio n. 2 - Impostazione del valore su VBA TextBox
Vediamo come possiamo impostare i valori per TextBox. A volte è obbligatorio impostare i valori altrimenti, l'utente inserirà qualsiasi cosa di suo interesse.
Passaggio 1: inserire un nuovo form utente in VBE. Vai al menu Inserisci > fai clic su UserForm.
Passaggio 2: da Strumenti form utente, selezionare TextBox e trascinarlo su Form utente.
Passaggio 3: inserire un CommandButton in UserForm nello stesso modo in cui è stato aggiunto TextBox.
Passaggio 4: modificare la didascalia del pulsante di comando su " Invia " in Proprietà. È possibile accedere alle proprietà del pulsante di comando facendo clic con il pulsante destro del mouse sul pulsante di comando> fare clic su Proprietà .
Passaggio 5: fare doppio clic sul pulsante di invio o fare clic destro su di esso e selezionare Visualizza codice .
Passaggio 6: nel codice, inserire una riga di nuovo codice all'interno della procedura secondaria come di seguito.
Codice:
Private Sub CommandButton1_Click () TextBox1.Value = "Il mio nome è Lalit!" End Sub
Questo codice evidenziato consente di assegnare il valore a destra racchiuso tra virgolette doppie al TextBox. È inoltre possibile utilizzare la proprietà TextBox.Text anziché TextBox.Values per impostare il valore per TextBox.
Passaggio 7: Premi F5 o il pulsante Esegui in VBE per eseguire questo codice, vedrai un form utente con TextBox vuoto. Non appena si preme il pulsante di invio, il testo assegnato a TextBox apparirà lì al suo interno.
Esempio n. 3 - Limita input TextBox per accettare solo valori numerici
Segui i passaggi seguenti:
Passaggio 1: inserisci un nuovo form utente nel tuo VBA e aggiungi TextBox al suo interno.
Passaggio 2: modificare il nome di TextBox nella sezione Proprietà in " My_Age ".
Passaggio 3: fai doppio clic su TextBox o fai clic destro su di esso e seleziona Visualizza codice .
Potrai vedere la procedura secondaria iniziale come di seguito:
Codice:
Sottotitoli privati My_Age_Change () End Sub
Passaggio 4: ora, prova ad aggiungere una condizione If che inizia con If Not.
Codice:
Sottotitoli privati My_Age_Change () If Not End Sub
Passaggio 5: chiedere al compilatore di verificare se il valore di TextBox "My_Age" è numerico o non utilizza la parola chiave IsNumeric davanti alla condizione If Not.
Codice:
Sottotitoli privati My_Age_Change () If Not IsNumeric (My_Age.Value) End Sub
Passaggio 6: come richiesto da ogni condizione IF, aggiungere una parola chiave Then .
Codice:
Sottotitolo privato My_Age_Change () If Not IsNumeric (My_Age.Value) Quindi End Sub
In questo pezzo di codice, si richiede al compilatore di verificare se il valore immesso dall'utente in TextBox è numerico o meno. Se non è un numero, allora cosa fare? Segui il passaggio successivo.
Passaggio 7: con l'uso di MsgBox, aggiungi un commento del tipo "Mi dispiace! Sono consentiti solo numeri. ”Da visualizzare se il valore in TextBox non è numerico.
Codice:
Sottotitolo privato My_Age_Change () If Not IsNumeric (My_Age.Value) MsgBox "Mi dispiace! Sono consentiti solo numeri." End Sub
Passaggio 8: Ora, chiudere questa istruzione IF utilizzando la parola chiave End IF.
Codice:
Sottotitolo privato My_Age_Change () If Not IsNumeric (My_Age.Value) MsgBox "Mi dispiace! Sono consentiti solo numeri." End If End Sub
Passo 9: Ora, esegui questo codice premendo il pulsante F5 dalla tastiera o il pulsante Esegui da VBE e vedi l'output. Otterrai un TextBox come mostrato di seguito:
Ora, provo a inserire un valore intero in esso e vedere se in realtà mi consente di inserire lo stesso o meno.
Bingo, mi permette di memorizzare il valore intero.
Ora proviamo ad aggiungere un valore float (valore con punti decimali) a questa casella di testo e vediamo se ci permette di inserire lo stesso.
Controlliamo se questa casella di testo ci consente di archiviare o meno alcuni valori negativi. Scriverò un numero negativo e controllerò.
Bene! Bene!! Bene !!!, mi spara un messaggio dicendo che sono ammessi solo numeri. È successo perché questo codice scritto inizialmente è con condizione IF, non ha alcuna soluzione alternativa cosa fare se il numero non è positivo. Inoltre, l'età non può essere negativa. Giusto? Pertanto, sto ricevendo un messaggio di avviso come puoi vedere sopra. Tuttavia, se si fa clic su OK nella finestra di messaggio e si tenta di inserire il numero, ciò consentirà di farlo. Ma non consiglierò di infrangere le regole laggiù.
Infine, proviamo una stringa di testo nella casella e vediamo se consente lo stesso di essere archiviato nella casella di testo o meno.
Come giustamente previsto, non appena ho inserito la prima lettera di stringa, il sistema mi ha impedito di farlo lanciando un messaggio. Questo perché abbiamo menzionato una condizione nel nostro codice che dice se il valore non è numerico, si prega di lanciare un messaggio verso l'utente dicendo che sono ammessi solo valori numerici.
Cose da ricordare
- VBA TextBox è un'opzione speciale in UserForm. Che è progettato per ricevere input dall'utente stesso.
- Esistono due metodi per impostare i valori per un TextBox: usando TextBox.Text e usando TextBox.Value.
- A volte è obbligatorio limitare l'input dell'utente in modo da ottenere il giusto tipo di dati.
Articoli consigliati
Questa è una guida a VBA TextBox. Qui discutiamo come creare TextBox in Excel VBA insieme a esempi pratici e template Excel scaricabili. Puoi anche consultare i nostri altri articoli suggeriti:
- Come utilizzare la funzione IsNumeric di VBA?
- Creazione della casella combinata in Excel
- Inserisci CheckBox in Excel
- Funzione VBA UCASE in Excel
- Come chiudere UserForm in VBA?