Thread: Text function
View Single Post
  #6   Report Post  
Posted to microsoft.public.excel.misc
nc nc is offline
external usenet poster
 
Posts: 119
Default Text function

Dear Dave

I tried your solution below and got this error message, "Compile error:
Expected variable or procedure, not module".

Please advise. Thanks.


"Dave Peterson" wrote:

Another one:

Option Explicit
Function ByteReverse2(InputString As String) As String
ByteReverse2 = StrReverse(InputString)
End Function



nc wrote:

Dear Stefi

What sbout if I just want to reverse a text in a cell.

Thanks.

NC

"Stefi" wrote:

Only VBA has such a function (InStrRev). You can create an UDF like this:

Public Function FindRev(StrtoSearch As String, StrSearchedFor As String) As
Long
FindRev = 0
On Error Resume Next
FindRev = InStrRev(StrtoSearch, StrSearchedFor)
End Function

Regards,
Stefi


âžnc❠ezt Ã*rta:

Is there a function in Excel 2003 that is like "Search"/"Find", but start
from the right?

Thanks


--

Dave Peterson