Benvenuto Ospite Cerca | Topic Attivi | Utenti | | Log In | Registra

errore runtime vb excel Opzioni
gerry66
Inviato: Monday, March 05, 2012 5:43:56 PM
Rank: Member

Iscritto dal : 2/9/2012
Posts: 23
Ciao a tutti chi mi può aiutare a trovare la soluzione all'errore
di runtime 13 quando dal foglio calcolo apro l'inserimento dati e poi scelgo il codice dall'elenco dopo di che mi si visualizzano delle combo e delle caselle di testo, se scelgo la tipologia nella combobox1 e dopo vado direttamente nel selezionare il periodo nella combobox3 a questo punto mi va in runtime.(run-time errore 13)
Vi allego il file in manierada poter avere l'esempio corretto sotto occhio, inoltre spero di riuscire a farmi capire meglio.
http://uploading.com/files/1ca75377/vb%2B2012%2Bgenerale.rar/
grazie ancora
gerry66
Sponsor
Inviato: Monday, March 05, 2012 5:43:56 PM

 
a10n11
Inviato: Monday, March 05, 2012 6:39:32 PM

Rank: AiutAmico

Iscritto dal : 5/29/2003
Posts: 1,694
salve
considerato che la textbox3 si aspetta un valore numerico decimale, se passi direttamente dalla Combobox1 alla combobox3 la textbox3 vuota assume un valore di vuoto. questa istruzione
.Cells(URiga, 6).Value = CDbl(Me.TextBox3.Value)
che dovrebbe prelevare il valore della Textbox3 va in errore perchè i dati sono incongruenti.

Quindi se vuoi utilizzare la procedura di saltare il campo quantità, modifica così la riga di istruzione:

.Cells(URiga, 6).Value = Me.TextBox3.Value
nella macro del Commandbutton2

saluti
Giap

gerry66
Inviato: Monday, March 05, 2012 9:39:21 PM
Rank: Member

Iscritto dal : 2/9/2012
Posts: 23
grazie Giapp
però non me lo deve permettere, come posso modificare il codice?
ovvero se non c'è la quantità e il comando registra non me lo deve permettere
se copio il codice del Textbox3 in command2 funziona?
a10n11
Inviato: Monday, March 05, 2012 10:37:41 PM

Rank: AiutAmico

Iscritto dal : 5/29/2003
Posts: 1,694
Salve
l'istruzione per controllare la textbox della quantità l'hai già utilizzata ( a mio parere in una posizione non corrretta)

Hai usato questa:

If Not IsNumeric(TextBox3.Text) Then
MsgBox "Inserire solo numeri!", Title:="Errore"
nell'evento exit della Textbox

se la metti in capo alla macro del commandbutton2 il controllo avviene nel momento della registrazione.

in questo modo:

Private Sub CommandButton2_Click()
ActiveSheet.Unprotect "pp"

If Not IsNumeric(TextBox3.Text) Then
MsgBox "Manca la quantità", Title:="Errore"
Exit Sub
End If
With Sheets("Calcolo")
....
....
....


Inoltre l'istruzione che segue:

If IsNull(Me.ComboBox1.Text) Then
MsgBox "Inserisci i dati", Title:="Errore"
Else
...


non ha alcun senso, perchè solo immettendo una scelta nella comobox1 vengono attivati tutti gli altri controlli.
se non metti nulla puoi solo uscire dalla form.
saluti
Giap



gerry66
Inviato: Monday, March 05, 2012 10:53:11 PM
Rank: Member

Iscritto dal : 2/9/2012
Posts: 23
quindi posso cancellare queste due istruzioni

If Not IsNumeric(TextBox3.Text) Then
MsgBox "Inserire solo numeri!", Title:="Errore"
nell'evento exit della Textbox

e

If IsNull(Me.ComboBox1.Text) Then
MsgBox "Inserisci i dati", Title:="Errore"
Else

per spostare la prima all'interno della command2?
grazie
a10n11
Inviato: Tuesday, March 06, 2012 9:48:09 AM

Rank: AiutAmico

Iscritto dal : 5/29/2003
Posts: 1,694
gerry66 ha scritto:
quindi posso cancellare queste due istruzioni

If Not IsNumeric(TextBox3.Text) Then
MsgBox "Inserire solo numeri!", Title:="Errore"
nell'evento exit della Textbox

e

If IsNull(Me.ComboBox1.Text) Then
MsgBox "Inserisci i dati", Title:="Errore"
Else

per spostare la prima all'interno della command2?
grazie


salve
Si!

ps. la cosa che soprende è che hai scritto del codice (si suppone quindi che hai dimestichezza con VBA) ma non sai interpretarlo. C'è qualcosa che mi sfugge??
saluti
Giap

gerry66
Inviato: Tuesday, March 06, 2012 12:47:19 PM
Rank: Member

Iscritto dal : 2/9/2012
Posts: 23
Grrazie ancora degli aiuti, perchè senza di essi non ne sarei venuto fuori.
No, non c'è niente che ti sfugge, ti spiego come cerco di operare,
quando ho bisogno di approcciarmi al codice:
se posso risolvere con i riferimenti automatici da excel tanto meglio,
altrimenti cerco nel web degli esempi che posso adattare al mio caso
con prove su prove, quando non riesco a trovare soluzioni perchè mi
incasino con le mie mani cerco un aiuto dai forum.
Il codice, dove è scritto in maniera semplice cioè con comandi che più o meno
ho imparato a conoscere lo capisco, ma mi fermo a questo.
Per esempio se devo creare un pulsante di modifica e mi servirebbe, che mi ritiri su dalla riga
registrata i dati precedentemente inseriti, non so neanche da dove incominciare,
infatti quando dovevo registrare la riga di inserimento della form, se non ci fossi stato tu che
mi aiutavi non ero in grado di scriverlo.
Vado molto a memoria, ovvero con quello che nel tempo ho fatto, sicuramente pieno di errori
e quant'altro, infatti quando eseguo delle macro molte volte ci mettono parecchio tempo proprio
perchè sicuramente gli faccio fare dei giri che se fossi stato capace avrei evitato.
grazie grazie grazie ancora
gerry66
Utenti presenti in questo topic
Guest


Salta al Forum
Aggiunta nuovi Topic disabilitata in questo forum.
Risposte disabilitate in questo forum.
Eliminazione tuoi Post disabilitata in questo forum.
Modifica dei tuoi post disabilitata in questo forum.
Creazione Sondaggi disabilitata in questo forum.
Voto ai sondaggi disabilitato in questo forum.

Main Forum RSS : RSS

Aiutamici Theme
Powered by Yet Another Forum.net versione 1.9.1.8 (NET v2.0) - 3/29/2008
Copyright © 2003-2008 Yet Another Forum.net. All rights reserved.