Not the default, but you can change it

With ActiveSheet
.Parent.VBProject.VBComponents(.CodeName) _
.Properties("_CodeName") = "somevalue"
End With


--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"David Gerstman" wrote in message
...
In the VBA project window it gives two names to each worksheet, one inside
parentheses and one right before the parentheses.

The one inside the parentheses can easily be changed. But is there any way
to control the other one? If I keep on creating and deleting worksheets
the
Sheet # will keep incrementing. Is there any way to override that default
programmatically?