Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

EXCEL - Sostituire cifre con lettere

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

EXCEL - Sostituire cifre con lettere

Postdi commerciale » 22/11/18 11:36

Buongiorno,
oggi sono fuori forma...
In excel vorrei sostituire dei numeri con determinate lettere:
esempio:
0 sostituire con W
1 sostituire con V
2 sostituire con Z
3 sostituire con A
4 sostituire con B
5 sostituire con C
6 sostituire con F
7 sostituire con J
8 sostituire con K
9 sostituire con P

Sempre per esempio quindi in cella A1 ho 123,45, vorrei in B2 che appaia VZA,BC (massimo 2 decimali)
in cella A2 ho 7865,00 in B2 deve apparire JKFC,WW

Grazie anticipato
commerciale
Utente Junior
 
Post: 92
Iscritto il: 16/07/11 09:14

Sponsor
 

Re: EXCEL - Sostituire cifre con lettere

Postdi Anthony47 » 22/11/18 14:48

Se vuoi farlo con formule, basta annidare 10 volte la funzione SOSTITUISCI; es (limitandomi a 0 e 1)
Codice: Seleziona tutto
=SOSTITUISCI(SOSTITUISCI(A2;0;"W");1;"V")


Ma forse il metodo migliore e' tramite questa "Funzione Personalizzata":
Codice: Seleziona tutto
Function myCript(ByVal myNum As Double) As String
Dim newC, oldC, I As Long, StrNum As String
'
StrNum = CStr(myNum)
oldC = Array("0", "1", "2")     '<<< Da completare
newC = Array("W", "V", "Z")     '<<< Da completare
'
For I = LBound(oldC) To UBound(oldC)
    StrNum = Replace(StrNum, oldC(I), newC(I), , , vbTextCompare)
Next I
myCript = StrNum
End Function

Le righe marcate <<< sono da completare inserendo tutti i 10 digit
Metti il codice in un Modulo standard del vba; myCript si usa come una normale funzione, quindi ad esempio potresti usare la formula
Codice: Seleziona tutto
=myCript(A1)


Ciao
Anthony
Win7 + Office 2010 Ita; Win 7 + Office 2013 Ita
Xp + Office 2003 Ita
E voi cosa usate? (per istruzioni vedere viewtopic.php?f=26&t=97449)
Avatar utente
Anthony47
Moderatore
 
Post: 16531
Iscritto il: 21/03/06 16:03
Località: Ivrea


Torna a Applicazioni Office Windows


Topic correlati a "EXCEL - Sostituire cifre con lettere":


Chi c’è in linea

Visitano il forum: Nessuno e 12 ospiti