Hello Mark
ActiveWorkbook.VBProject.VBComponents("Sheet1").Na me = "NewName"

HTH

Regards
Pascal

"ZuludogM" a écrit dans le message de
...
If you select a sheet and look at the Properties, you will find two
properties that name the sheet:
(Name)
Name

When a user changes the sheet name by typing into the sheet Tab, they are
changing the Name property, but not the (Name) property.

Example: When you open a new workbook, Sheet1 will have properties:
(Name) = "Sheet1"
Name ="Sheet1"
When the user renames that sheet to "Revenues" the properties become:
(Name) = "Sheet1"
Name = "Revenues"

You can rename the (Name) property directly in the Properties table for
the sheet, however, I would like to read (and even write) that property in
VBA, but the only methods I can find are for the Name property. Anybody
know how to do this?

Thanks, Mark