Excel - VBA - Forzare cella testo sempre 3 cifre decimali

Question

Buon pomeriggio a tutti,

in una cella ho un totale, questa cella è formattata come numero "0.000". (Infatti, ricevo come totale per esempio: 23,450) :-)

In alcuni casi, sommo a questo totale un'altra lunghezza (per esempio: 0,200) , e per sottolineare l'eccezionalità, aggiungo alla cella il valore: "[A]"

Quindi la cella, in questi casi, assume come valore [A] x,xxx.

Nei casi, però, in cui il totale della somma abbia uno o più zero come ultime cifre (es.: 23, 650; 23,100; 23,000) la cella (formattandosi come testo) assume, rispettivamente agli esempi, i seguenti valori:

23,650 ---> [A] 23,65

23,100 ---> [A] 23,1

23,000 ---> [A] 23

Come posso "forzare" la cella ad assumere un valore [A] x,xxx sempre con 3 cifre decimali?

Grazie a tutti.

Saluti!

Answer 1

Ciao Paolo,

Prova:

      Cells(i, k).Value = "[A]" & Format(Cells(i, k).Value, "0.000")

Per utilizzare i valori risultanti come numeri, è possibile invece aggiungere il prefisso desiderato con un formato personalizzato.

Quindi, prova:

      Cells(i, k).NumberFormat = """[A]"" #,##0.000"

===

Regards,

Norman

Answer 2

cells(i,k).value = "[A] & cells(i,k).value

2.

avviene tutto via codice (somma, formattazione, aggiunta [A], etc..

:-)

Prova:

      Cells(i, k).Value = "[A]" & Format(Cells(i, k).Value, "0.000")

===

Regards,

Norman

Answer 3

cells(i,k).value = "[A] & cells(i,k).value

2.

avviene tutto via codice (somma, formattazione, aggiunta [A], etc..

:-)

Answer 4

Ciao Paolo,

in una cella ho un totale, questa cella è formattata come numero "0.000". (Infatti, ricevo come totale per esempio: 23,450) :-)

In alcuni casi, sommo a questo totale un'altra lunghezza (per esempio: 0,200) , e per sottolineare l'eccezionalità, aggiungo alla cella il valore: "[A]"

Quindi la cella, in questi casi, assume come valore [A] x,xxx.

Nei casi, però, in cui il totale della somma abbia uno o più zero come ultime cifre (es.: 23, 650; 23,100; 23,000) la cella (formattandosi come testo) assume, rispettivamente agli esempi, i seguenti valori:

23,650 ---> [A] 23,65

23,100 ---> [A] 23,1

23,000 ---> [A] 23

Come posso "forzare" la cella ad assumere un valore [A] x,xxx sempre con 3 cifre decimali?

Ho due domande:

• Come stai aggiungendo il testo [A ] al valore della cella?
• Come viene coinvolto VBA?

===

Regards,

Norman