Automatically update worksheet name
Is there a way to change the names of worksheets automatically? I use Excel
2007 for invoicing, but it's really a pain to have to rename each sheet to reflect my invoice number. Is there a formula or solution for this? Thanks! |
Automatically update worksheet name
Private Sub Worksheet_Change(ByVal Target As Range)
Const WS_RANGE As String = "H5" '<== change to cell with invoice number On Error GoTo ws_exit Application.EnableEvents = False If Not Intersect(Target, Me.Range(WS_RANGE)) Is Nothing Then Me.Name = Target.Value End If ws_exit: Application.EnableEvents = True End Sub 'This is worksheet event code, which means that it needs to be 'placed in the appropriate worksheet code module, not a standard 'code module. To do this, right-click on the sheet tab, select 'the View Code option from the menu, and paste the code in. -- HTH Bob "JuneS" wrote in message ... Is there a way to change the names of worksheets automatically? I use Excel 2007 for invoicing, but it's really a pain to have to rename each sheet to reflect my invoice number. Is there a formula or solution for this? Thanks! |
All times are GMT +1. The time now is 05:04 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com