Il errore di mancata corrispondenza del tipo in Excel VBA si verifica quando si tenta di assegnare un valore a una variabile che non è del tipo corretto.
Posiziona un pulsante di comando sul foglio di lavoro e aggiungi le seguenti righe di codice:
Dim numero come intero
numero = "bicicletta"
Risultato quando si fa clic sul pulsante di comando sul foglio:
Spiegazione: non è possibile assegnare un valore stringa (bicicletta) a una variabile di tipo Integer.
L'errore di mancata corrispondenza del tipo (errore di runtime 13) si verifica spesso quando si utilizza la funzione InputBox in Excel VBA.
1. Posiziona un pulsante di comando sul foglio di lavoro e aggiungi le seguenti righe di codice:
Dim numero come intero
numero = InputBox ("Inserisci un numero", "Radice quadrata")
MsgBox "La radice quadrata di " & numero & " è " & Sqr(numero)
2. Fare clic sul pulsante di comando sul foglio, immettere il valore della stringa centinaio e fare clic su OK.
Risultato:
3. Fare clic su Fine.
4. Per visualizzare un messaggio amichevole invece di errore di mancata corrispondenza del tipo, aggiorna il codice come segue.
Numero dim come variante
numero = InputBox ("Inserisci un numero", "Radice quadrata")
If IsNumeric(numero) Then
MsgBox "La radice quadrata di " & numero & " è " & Sqr(numero)
Altro
MsgBox "Inserire un numero"
Finisci se
Spiegazione: una variabile di tipo Variant può contenere qualsiasi tipo di valore (vedi prima riga). La funzione IsNumeric in Excel VBA controlla se un valore è un numero.
5. Ripetere il passaggio 2.
Risultato:
6. Infine, controlla se questo semplice calcolatore di radice quadrata funziona.
Risultato:
Suggerimento: scarica il file Excel (lato destro di questa pagina) e provalo.
