Questione : trovare e sostituire i caratteri all'interno di un campo o di una cellula

Ciao, il

We sta provando a risolvere un problema del testo di dati using eccelle. Dal momento che abbiamo dati che compaiono all'interno di una cellula che è stata cifrata using una forma di base di occhiata e sostituiscono per ogni carattere all'interno di un cell.

Ie David = {tr4 {

We vorrebbe invertire il processo e convertire i caratteri encypted nuovamente dentro la relativa condizione originale via un
di occhiata table.

Ie del carattere {=
t = a
r = v
4 = i

therefore {tr4 {= David

Is là che un senso che questo può essere realizzato dentro eccelle?

class= del

Risposta : trovare e sostituire i caratteri all'interno di un campo o di una cellula

Potreste scrivere una funzione su ordinazione come quella che ho un sotto.  Aggiungere più punte “nella sezione di caso prescelto„ per decodificare più caratteri.

HTH
Matt
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
Funzione pubblica DecodeText (mytext come stringa)

intLength fioco come numero intero
Oscurare la i
Oscurare lo strCurrentLetter come stringa
Oscurare lo strNewText come stringa

intLength = Len (mytext)

Per i = 1 a intLength
    strCurrentLetter = metà di (mytext, i, 1)
    
    Selezionare lo strCurrentLetter di caso
        Mettere “{„
            strNewText = strNewText & “D„
        Caso “t„
            strNewText = strNewText & “a„
        Caso “r„
            strNewText = strNewText & “v„
        Caso “4„
            strNewText = strNewText & “io„
        Caso altrimenti
            'Non fare niente
            'Aggiungere più dichiarazioni “di caso„ qui sopra per convertire più lettere che sono messe
    Concludere prescelto
Dopo

DecodeText = strNewText

Funzione di conclusione
Altre soluzioni  
 
programming4us programming4us