Acquista i nostri libri consigliati su Amazon.it
+ Rispondi al messaggio
Visualizzazione dei risultati da 1 a 3 su 3

Sostituisci un carattere di un cella con un'altro carattere.

  1. #1
    cicco non  in linea Novello
    Post
    5
    Like Inviati  
    0
    Like Ricevuti  
    0
    Ciao a tutti, ho cercato un p nei vari post ma non ho trovato niente per ora.

    Mi chiedevo se esisteva una funzione per sostituire caratteri di un cella con altri caratteri mantenendo l'ordine.

    Mi spiego meglio.

    Colonna A1 = "A,A,A,A,B,B,B,"

    Colonna B2 (esempio soluzione) = "1,1,1,1,0,0,0"

    Pertanto alla lettera A fai corrispondere un 1, alla lettere B uno 0.

    Vi ringrazio in anticipo.

    Saluti

  2. #2
    L'avatar di dodo47
    dodo47 non  in linea Topo di biblioteca
    Post
    3,107
    Like Inviati  
    0
    Like Ricevuti  
    0
    Ciao
    (sa tanto di codice cifrato... )

    Con una formula avresti delle limitazioni sulla base del numero di lettere da sostituire. In pratica potresti concatenare n "SOSTITUISCI"con CERCA.VERT.
    Per farti un esempio valido solo su quanto hai esposto:
    A1= A,A,A,A,B,B,B

    F1= A
    F2= B
    G1= 1
    G2= 0

    dove vuoi il risultato scrivi:
    =SOSTITUISCI(SOSTITUISCI(A1;"A";CERCA.VERT("A";F1:G2;2;FALSO));"B";CERCA.VERT("B";F1:G2;2;FALSO))
    
    Ma come detto un percorso limitato.

    In alternativa ti crei una udf.

    - devi sempre creare una tabella di corrispondenza tra lettera e numero
    - poniamo che la inserisci da F1 a G100 (quindi in col F le lettere ed in col G i numeri)
    - in A1 (o dove vuoi) la tua stringa
    - in un modulo crei la tua UDF:
    Function SostCar(mVal As Range, mTab As Range)
    mVal1 = mVal
    For i = 1 To Len(mVal)
        c = Mid(mVal1, i, 1)
        v = Application.VLookup(c, mTab, 2, False)
        On Error Resume Next
        x = Replace(mVal1, c, v)
        
        mVal1 = x
    Next i
    SostCar = mVal1
    End Function
    
    Poi, nella cella dove vuoi il risultato scrivi:
    =sostcar(A1;F1:G5)
    
    C' da lavorarci perch se non trova una corrispondenza restituisce zero, ma......

    saluti

  3. #3
    cicco non  in linea Novello
    Post
    5
    Like Inviati  
    0
    Like Ricevuti  
    0
    grazie dodo! adesso me lo studio un p

+ Rispondi al messaggio

Potrebbero interessarti anche ...

  1. Risposte: 7
    Ultimo Post: 17-10-2017, 15:40
  2. Risposte: 1
    Ultimo Post: 13-06-2017, 11:18
  3. Cambiare carattere in cella con due font diversi
    Da HankMoody nel forum Microsoft Excel
    Risposte: 31
    Ultimo Post: 13-12-2012, 10:10
  4. Cambio colore alla Cella ed al Carattere
    Da zpror nel forum Microsoft Word
    Risposte: 2
    Ultimo Post: 03-09-2008, 12:46
  5. Excel: qunate volte si ripete un carattere in una cella??
    Da Elimar nel forum Microsoft Excel
    Risposte: 5
    Ultimo Post: 23-05-2006, 18:04