Capitalize words in numbered list

This is a sample from my data set. All lines are within a same column

Please Login or Register  to view this content.

My aim is to capitalize the first letter of the first word in each numbered listing, to obtain this

Please Login or Register  to view this content.

Every contribution to the automation of this task will be greately appreciated!!

Proper case maybe?

Please Login or Register  to view this content.

Thank you for your contribution! Unfortunately, running your code as a Macro, it would make every single word begin with a capital letter. My aim is to capitalize only 1) Word1 word2 2)Word3 etc.

The following gets you closer. There may be a few special cases where it fails, but I think it works accurately for your example.

Please Login or Register  to view this content.

Thank you so much, that does it indeed. Could you change the code so that I can apply it to the whole sheet? (and not only to "active cell"? Thank you again!!

This should be closer to what you want. It assumes that your data is in column A. If it is in a different column then change the 2 occurrences of cells(1,1) to cells(1,n) where n is 2 for column-B etc.

Make a backup of your data before running!

Please Login or Register  to view this content.

Or try this:

Please Login or Register  to view this content.

1.Select range

2.Run sub UPPER_All()

GeoffW283 Mmmh. Running that code as Macro gives me as a result (both in MS Excel 2010 and 2016) a Visual Basic error dialogue reading "Run-time error '5': / Invalid procedure call or argument"

Originally Posted by Phuocam

Or try this:

Please Login or Register  to view this content.

1.Select range

2.Run sub UPPER_All()

This worked flowlessly! Thank you again!!