Invert Text

[Gary's Student]

Is there an easy way to invert text? For example, if A1 = "Blanche DuBois"
I would like invert(A1) to equal "sioBuD ehcnalB"

Thanks in advance

 

[David McRitchie]

You can use StrReverse in a User Defined Function, or in a macro
http://groups.google.com/groups?threadm=#52e1e#[email protected]

Function ReverseText(cell)
ReverseText = StrReverse(cell.Text)
End Function

usage:
=ReverseText(A1)

 

[Gary's Student]

Thank you. Works like a charm!
--
Gary's Student

You can use StrReverse in a User Defined Function, or in a macro
http://groups.google.com/groups?threadm=#52e1e#[email protected]

Function ReverseText(cell)
ReverseText = StrReverse(cell.Text)
End Function

usage:
=ReverseText(A1)

---
HTH, http://www.mvps.org/dmcritchie/excel/strings.htm
David McRitchie, Microsoft MVP - Excel [site changed Nov. 2001]
My Excel Pages: http://www.mvps.org/dmcritchie/excel/excel.htm
Search Page: http://www.mvps.org/dmcritchie/excel/search.htm

Is there an easy way to invert text? For example, if A1 = "Blanche DuBois"
I would like invert(A1) to equal "sioBuD ehcnalB"

Thanks in advance