Need to separate continuous capital words of a string within a single cell

Hi Team,

I tried to search on forum to get rid of what i need, but, not found and hence writing this.

Please help me to sort out that to separate the capital words from a string which is in cell.

Example sheet is attached.

Thanks & Regards
Chaitanya

First install the following User Defined Function (UDF):

Please Login or Register  to view this content.

Then in B2 enter:

=AllCaps(A2) and copy down


User Defined Functions (UDFs) are very easy to install and use:

1. ALT-F11 brings up the VBE window
2. ALT-I

ALT-M opens a fresh module

3. paste the stuff in and close the VBE window

If you save the workbook, the UDF will be saved with it.
If you are using a version of Excel later then 2003, you must save
the file as .xlsm rather than .xlsx

To remove the UDF:

1. bring up the VBE window as above
2. clear the code out
3. close the VBE window

To use the UDF from Excel:

=AllCaps(A2)

To learn more about macros in general, see:

http://www.mvps.org/dmcritchie/excel/getstarted.htm

or

http://www.cpearson.com/excel/Writin...ionsInVBA.aspx

for specifics on UDFs

Macros must be enabled for this to work!

Hi Jakobshavn,

Thanks a lot for the macro. It worked. Really great.