Invert Text

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
--
Gary's Student

You can use StrReverse in a User Defined Function, or in a macro
http://groups.google.com/groups?thre...TNGP11.phx.gbl

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

"Gary's Student" <[email protected]> wrote in message
news:[email protected]...
> 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
> --
> Gary's Student

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


"David McRitchie" wrote:

> You can use StrReverse in a User Defined Function, or in a macro
> http://groups.google.com/groups?thre...TNGP11.phx.gbl
>
> 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
>
> "Gary's Student" <[email protected]> wrote in message
> news:[email protected]...
> > 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
> > --
> > Gary's Student
>
>
>