Sorting Data Alphabetically In One Cell Using VBA - Not Removing Spaces

[thechrissamsa]

Hello!
I'm a long time lurker, first time poster. I'm hoping there is a quick fix for the issue that I'm running into. I used a thread on this forum to learn how to sort lists within single cells alphabetically using the user defined function below. This function works perfectly except that it is eliminating spaces from my original entries. The original entries in my workbook are full names so I need the spaces to remain in tact for it to really be functional for me. Is there a modification that I can make to the user defined function to retain the spaces that exist in the original cells?

Current User Defined Function:

Please Login or Register  to view this content.

Thanks to everyone in the forum, I have found many solutions since stumbling across this forum a few years ago.

[maniacb]

Try this code

enter as: =@GetSort(A3," ")

Please Login or Register  to view this content.

[thechrissamsa]

I'm getting "#VALUE!" when I point that function at the original cells as well as the column that I created using the first code.