Hardware Upgrade Forum - [VBA] - Visualizzazione numerica

Hardware Upgrade Forum (https://www.hwupgrade.it/forum/index.php)

- Programmazione (https://www.hwupgrade.it/forum/forumdisplay.php?f=38)

- - [VBA] - Visualizzazione numerica (https://www.hwupgrade.it/forum/showthread.php?t=2860547)

[VBA] - Visualizzazione numerica

Salve ragazzi,

con questa stringa di codice in vba

Codice:

Dim TOTAL As Double

txtTotal.Text = CDbl(TOTAL)

visualizzo il numero in questo formato 1.67660084078015E-02 ma vorrei che fosse visualizzato così 0.0167660084078015

txtTotal è una TextBox

Che tipo di variabile devo utilizzare?

Grazie

Quote:

Originariamente inviato da lucausa75 (Messaggio 45700043)

Salve ragazzi,

con questa stringa di codice in vba

Codice:

Dim TOTAL As Double

txtTotal.Text = CDbl(TOTAL)

visualizzo il numero in questo formato 1.67660084078015E-02 ma vorrei che fosse visualizzato così 0.0167660084078015

txtTotal è una TextBox

Che tipo di variabile devo utilizzare?

Grazie

la variabile va bene double va bene per quel numero quello che devi fare è formattare la stringa in modo da evitare l'uso della notazione scientifica nella stringa, guarda la funzione Format

Quote:

Originariamente inviato da !fazz (Messaggio 45700741)

la variabile va bene double va bene per quel numero quello che devi fare è formattare la stringa in modo da evitare l'uso della notazione scientifica nella stringa, guarda la funzione Format

Grazie per il suggerimento infatti ho risolto in questo modo:

Codice:

Dim TOTAL As Double

txtTotal.text = Format(TOTAL, "0.################")

Invece se copio il valore di quella textbox in una cella di excel:

Codice:

Cells(i, TOTALColposition).Value = txtTotal.Value

Il risultato sarà corretto ma la cella excel visualizzerà il valore numerico completo 0,478155747951531 non quello formattato che a me serve 0,4782

e per visualizzarlo correttamente è necessario fare doppio click nella cella e tutto funziona.

Come posso risolvere?

Prova con la funzione round()