Reverse text

[Tod]

Hi
I need a formula (or other method) to reverse the text in a cell?
Eg "Paper clip" would become "pilc repaP".
Any suggestions?

Tod

 

[Roger Govier]

Hi Tod

A Google search produces the following postings by Chip Pearson and
Harlan Grove which should provide what you want
http://snipurl.com/wpdz

 

[Tod]

Thanks Roger,
Unfortunately I'm not yet up to speed in VBA or in how to incorporate a
piece of such coding into standard Excel.
How can I cut and paste and use something like:

Function RevText(S As String) As String
Dim Ndx As Integer
For Ndx = Len(S) To 1 Step -1
RevText = RevText & Mid(S, Ndx, 1)
Next Ndx
End Function

into standard Excel?

Tod
----------------------------

 

[Roger Govier]

Hi Tod

You can copy the code and paste it into your Visual Basic Editor
(VBE) in a Standard Module located in your file.

To do this,

Alt + F11 (open VBE)
Ctrl + R (open Project Explorer)
Select the file name on the left
Insert > Module
Paste code in Module


On your Excel sheet
=Revtext(a1)
will reverse the contents of cell A1


David McRitchie has lots of useful help on his site at
http://www.mvps.org/dmcritchie/excel/install.htm
http://www.mvps.org/dmcritchie/excel/getstarted.htm

 

[Tod]

Thanks Roger, I got it to work.
I'm going to find it very useful in tasks like 'parsing' text and tables
that I have copied and pasted from WebPages, but that still needs some
tidying up in Excel, often because it contains a smattering of
unidentifiable symbols.
Tod

 

[Roger Govier]

Hi Tod
Thanks for the feedback and glad you got it to work.
The real thanks though are to Chip and Harlan and others who have posted
the code.