{"id":11318,"date":"2019-06-07T09:09:03","date_gmt":"2019-06-07T07:09:03","guid":{"rendered":"https:\/\/www.myexcelonline.com\/?p=11318"},"modified":"2024-02-06T16:15:10","modified_gmt":"2024-02-06T15:15:10","slug":"convert-selection-to-sentence-case-using-macros-in-excel","status":"publish","type":"post","link":"https:\/\/www.myexcelonline.com\/meo-staging\/blog\/convert-selection-to-sentence-case-using-macros-in-excel\/","title":{"rendered":"Convert Selection to Sentence Case Using Macros In Excel"},"content":{"rendered":"

When it comes to cleaning up text, Excel Macros<\/a> can make short work of it. You can create Macros to convert selection to sentence case<\/strong> with one click!<\/p>\n

Make sure your Excel has the Developer Tab enabled following\u00a0this tutorial<\/a>.<\/p>\n

I explain how you can do this below step by step!<\/p>\n

What does it do?<\/strong><\/em><\/p>\n

Converts selected text to sentence case<\/p>\n

Copy Source Code:<\/strong><\/em><\/p>\n

\r\n\r\n'Make sure you have selected a range first\r\n'Assumption is each cell is a single sentence\r\nSub ConvertSelectionToSentenceCase()\r\n\r\nDim rng As Range\r\n\r\nFor Each rng In Selection\r\n'Check if this is text first, then convert into sentence case\r\n'Make the first letter capitalized, then the rest of the text as small letters\r\nIf Application.WorksheetFunction.IsText(rng) Then\r\nrng.Value= UCase(Left(rng, 1)) &amp; LCase(Right(rng, Len(rng) -1))\r\nEnd If\r\nNext\r\n\r\nEnd Sub\r\n\r\n<\/pre>\n
Final Result:\u00a0<\/strong><\/em>
\n\"Convert
\nExercise Workbook:<\/strong><\/em><\/p>\n
\n