Errore di run-time '13'

Salve ho creato un UserForm con 16 TextBox, quando cerco di traferire i dati caricati, se non carico tutte le TextBox mi segnale un Errore di run-time'13' , se invece riempio tutte le textbox trasferisce senza problemi.Dove sbaglio ??? E' possibile ovviare l'inconveniente ??
Grazie per eventuali consigli

Ciao
Innanzi tutto una cosa: se hai assegnato il contenuto delle TextBox a delle variabili perchè poi trasferisci il contenuto delle TextBox alle diverse celle? Le variabili sono inutili. Io le eliminerei.

Ciò premesso prova a mettere prima del trasferimento dei dati

On Error Resume Next

e dopo il trasferimento ripristina la gestione degli errori con

On Error Goto 0
Quest'ultimo si potrebbe omettere ma è meglio così.


Fai sapere. Ciao,
Mario

PS Attento nella immissione del prezzo. Se usi il punto del tastierino numerico sballa tutto.

Buon pomeriggio, Roberto;
consentimi un caro saluto a @Marius44.

Dopo aver preso buona nota del suggerimento di Mario, in alternativa, potresti considerare di condizionare il trasferimento dei Dati al Valore inserito nel TextBox <>""; si potrebbe pensare ad una condizione di questo tipo:

Ho inserito i punti di sospensione volutamente in quanto personalmente definirei le Variabili "Data" as Data e le Variabili "Prezzo" as Integer (per prezzi con Valori senza decimali) oppure as Double (per prezzi con Valori decimali)



A disposizione.

Buon Lavoro.

Giuseppe

Grazie Mario, ho seguito il tuo suggerimento e funziona perfettamente, ho anche eliminato le variabili(pensavo fossero necessarie) in questo modo tutto è più semplice e lineare .Ti ringrazio infinitamente

ciao
mi permetto intervenire per chiarire che l'errore di run-time è dovuto alle istruzioni che usano:
- CDate
- CDbl

quando le text box sono vuote

E' buona norma analizzare prima il contenuto delle text box e poi applicare le due funzioni; per esempio:

If TextBox1.Value <> "" then Cells(Nriga, 5) = CDate(TextBox1.Value)
oppure
If TextBox3.Value <> "" Then Cells(Nriga, 7) = CDbl(TextBox3.Value)

Suggerisco di "evitare" l'uso del On Error Resume Next in quanto tale istruzione bypassa tutti gli errori che incontra (e comunque se indispensabile - ma non è questo il caso - va ripristinata)

saluti

Ciao a tutti
Come sempre, dodo47 (ciao Domenico) ha ragione!

In quel contesto mi è sembrato il modo più veloce per togliere dalle ambasce l'utente.

Ciao,
Mario