Cum putem scrie in oglinda folosind Excel?

351 viewsIntrebari
0

Intrebare primita de la Paul:

Cum putem scrie in oglinda folosind Excel? Ca sa fiu mai explicit : voi pune in fiecare coloana cate o litera (de exemplu A,B,C,D) si folosind o formula vreau ca ele saimi apara dedesubt rasturnate (adica D,C,B,A). Am incercat mai multe variante dar nu am reusit. Imi da mesajul “Formula Incorecta” .Am reusit totusi in Google Cloud cu o formula de genul: sort((C1:C4), row(C1:C4),).

1

Salut!
o solutie pentru un text in celula B4 ar fi:

=CONCATENATE(IF(LEN(B4)<1,"",LEFT(RIGHT(B4,1),1)),IF(LEN(B4)<2,"",LEFT(RIGHT(B4,2),1)),IF(LEN(B4)<3,"",LEFT(RIGHT(B4,3),1)),IF(LEN(B4)<4,"",LEFT(RIGHT(B4,4),1)))

pentru a marii textul, trebuie doar sa adaugi <IF(LEN(B4) unde ## =numarul de ordine, in cazul nostru vom continua cu 5.

Succes!

commented on answer

pentru a marii textul, trebuie doar sa adaugi (IF(LEN(B4<##,"",LEFT(RIGHT(B4,##),1)) unde ## =numarul de ordine, in cazul nostru vom continua cu 5. P.S. imi cer scuze pt editari si duplicate, e prima oara cand postez in wordpress.

0

dupa cateva raspunsuri urmarite pe excelninja am gasit o solutie mai buna – mid(celula,nr_ordine, nr_caractere), pentru texte mai lungi.
si mai ales, utilizarea & in loc de concatenate. (nu cred ca o sa obisnuiesc prea curand sa scap de concatenate)

insa raspunsul l-am postat aici:

edited answer
0

Poti face un modul cu o functie :

Public Function invers(celula As Range) As String

Application.Volatile
Dim lung As Integer
Dim nou As String

For lung = Len(celula) To 1 Step -1
If lung = Len(celula) Then
nou = Right(celula, 1)
Else
nou = nou + Mid(celula, lung, 1)
End If
Next
invers = nou
End Function

iar in celula unde ai nevoie de invers vei scrie “=invers(c3)” unde c3 este celula cu textul de inversat

Succes