Worksheet Renaming
I have multiple Excel spreadsheets containing data that is all upper case. I
would like to modify the documents so that the only the first letter of each word is upper case and the rest are lower. There is a substantial amount of data, so manually performing this process would be extremely time consuming. Is there a way to use formulas to accomplish this automatically? Thanks! |
Worksheet Renaming
Will this do?
Sub renameall() Dim ws As Worksheet For Each ws In ThisWorkbook.Worksheets ws.Name = Application.WorksheetFunction.Proper(ws.Name) Next ws End Sub Mike "Eric" wrote: I have multiple Excel spreadsheets containing data that is all upper case. I would like to modify the documents so that the only the first letter of each word is upper case and the rest are lower. There is a substantial amount of data, so manually performing this process would be extremely time consuming. Is there a way to use formulas to accomplish this automatically? Thanks! |
All times are GMT +1. The time now is 06:28 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com