- Click Alt+F11 to open Visual Basic Editor (VBE).
- From the Insert menu, select Module (to add a module).
- Enter the following lines of code into the module:
Function ReverseText(text) As String
Dim TextLen As Integer
Dim i As Integer
TextLen = Len(text)
For i = TextLen To 1 Step -1
ReverseText = ReverseText & Mid(text, i, 1)
Next i
End Function
Testing the function:
To test the function, open Paste Function (Shift+F3).
From the User Defined category, select the ReverseText function.
In the function box, select any cell that contains text.
Click OK.
|
What the IRS Doesn't Want You to Know: A Cpa Reveals the Tricks of the Trade
