Sort words from the end

[Pampos]

Hello. I want, for example, to sort

big house
small tree
red cat
green house

alphabetically but start from the last letter.

For example, the result must be

small tree
big house
green house
red cat

Is that possible with excel? I already tried =RIGHT(A1,1) but is doesn't help me for the purpose I want the sorting.

Do you know if it is easier to do that in word?

Thanks

 

[NARAYANK991]

Hi ,

It is easy if you use VBA ; is that an option ?

If yes , then see the attached file.

Narayan

 

[p45cal]

You can add a user-defined function such as Reverse which will take your strings and reverse them. Then you can sort on that new column. See attached which has such a function but I have left it unsorted, ready for you to do a standard sort on column B.
Before:


After:


And the code for that function:

Function Reverse(TheString)
For i = Len(TheString) To 1 Step -1
  Reverse = Reverse & Mid(TheString, i, 1)
Next i
End Function

 

[Pampos]

Many thanks. REVERSETEXT is working as I want to.

 

[p45cal]

I positively knew there was a shorter UDF I could write when I put forward my offering earlier. Here it is:

Function Reverse(TheString)
Reverse = StrReverse(TheString)
End Function