Percentuale e textbox

Hai un problema con Excel?

Nuova discussione

Percentuale e textbox
di Tod (utente non iscritto) data: 23/02/2009
Buongiorno a tutti, sono difronte ad un problema che non so risolvere, e spero mi possiate aiutare; ho una userform con delle textbox di cui una di queste deve contenere un valore espresso in percentuasle. es. 10%.
come posso effettuare il calcolo qui sotto:

es.
textbox1 = 1000, textbox2=10% textbox3=textbox1 * textbox2
invio il codice vba da me scritto però dopo aver formattato la textbox con la percentuale non ottengo il calcolo voluto ma un errore.
grazie
Private Sub TextBox2_AfterUpdate() TextBox2.Value = Format(TextBox2 / 100, "0%") TextBox3 = TextBox1 * TextBox2 / 100 TextBox3 = Format(TextBox3, "#,##0.00") End Sub
di Enzo (utente non iscritto) data: 23/02/2009
Per poter eseguire operazioni aritmetiche tra textbox devi anteporre al valore della textbox l'istruzione clng
questa qui sotto fa si che moltiplichi il valore della textbox1 per il contenuto della textbox2 in percentuale e il risultato viene evidenziato in textbox 3
adattala alle tue esigenze e fa sapere se va bene
ciao
TextBox3.Value = CLng(TextBox1.Value) * CLng(TextBox2.Value) / 100

di Enzo (utente non iscritto) data: 23/02/2009
Guarda se una cosa del genere puo' andar bene

Private Sub TextBox2_AfterUpdate()
TextBox3 = CLng(TextBox1) * CLng(TextBox2) / 100
TextBox3 = Format(TextBox3, "#,##0.00")
TextBox2.Value = TextBox2.Value & "%"
End Sub

di Enzo (utente non iscritto) data: 23/02/2009
Sostituisci clng con cstr

Vuoi Approfondire?