formato per mille

[jor...@libero.it]

c'è un modo in excel di inserire un formato numerico "per mille"?
es. 0,001 = 1 per mile (esiste un simbolo?)

grazie

G.

[fernando cinquegrani]

[jor...@libero.it] scrive in
http://www.google.it/groups?threadm=1130146072.0...@g43g2000cwa.googlegroups.com

> c'è un modo in excel di inserire un formato numerico "per mille"?
> es. 0,001 = 1 per mile (esiste un simbolo?)

te lo sconsiglio, ma, se vuoi,
puoi trasformare la cella in testo
con
Alt+F11 per entrare nell'editor vba
da menu: inserisci modulo
in modulo1 incolla

public Sub permille()
Dim c As Range
For Each c In Selection
c.Value = Format(c.Value * 1000, "0.00") & " 0/00"
c.Characters(Len(c.Text) - 3, 1).Font.Superscript = True
c.Characters(Len(c.Text) - 1, 2).Font.Subscript = True
c.HorizontalAlignment = xlRight
Next
End Sub

quindi con Alt+F11 ritorni in excel
selezioni le celle da trasformare e da menu
strumenti :: macro :: macro...permille [esegui]

quando richiami la cella in una formula
devi sostituire il nome della cella (es.: A1)
con
=VALORE(SINISTRA(A1;LUNGHEZZA(A1)-4))/1000
.f

[fernando cinquegrani]

[fernando cinquegrani] scrive in
http://www.google.it/groups?threadm=%23zo4xvI...@TK2MSFTNGP12.phx.gbl

> quando richiami la cella in una formula
> devi sostituire il nome della cella (es.: A1)
> con
> =VALORE(SINISTRA(A1;LUNGHEZZA(A1)-4))/1000

e userai
=SOMMA(VALORE(SINISTRA(A1:A10;LUNGHEZZA(A1:A10)-4))/1000)
Ctrl+Maiusc+Invio
per ottenere la somma dei valori trasformati
in A1:A10
.f

[fernando cinquegrani]

[fernando cinquegrani] scrive in
http://www.google.it/groups?threadm=%23zo4xvI...@TK2MSFTNGP12.phx.gbl

> public Sub permille()

> Dim c As Range
> For Each c In Selection
> c.Value = Format(c.Value * 1000, "0.00") & " 0/00"
> c.Characters(Len(c.Text) - 3, 1).Font.Superscript = True
> c.Characters(Len(c.Text) - 1, 2).Font.Subscript = True

aggiungi anche
c.Characters(Len(c.Text) - 4, 5).Font.Size = c.Font.Size * 0.8

> c.HorizontalAlignment = xlRight
> Next
> End Sub

.f