Referencing a sheet's codename

In the VB editor, I changed my sheet's codename and I'm trying to use code to reference the sheet's codename instead of the worksheet name itself because the user can modify the sheet names in on the sheet tab. In the VB editor, I have ShtTestingData(Sheet1). Instead of using

Set oWS = ActiveWorkbook.Worksheets("Sheet1")

, I'm trying to use

Set oWS = ActiveWorkbook.ShtTestingData

. However, it is not working. Am I missing something?

Also, using the same sheet name above, how would I re-write the following using the sheet's codename?

ThisWorkbook.Worksheets("Sheet1").Range("WorkersName").Value = bciValue

If the active workbook is the one in which the code is running, just

Please Login or Register  to view this content.

But there's probably no need to do that, e.g.

Please Login or Register  to view this content.

Then I don't believe you can refer to it by CodeName, at least not simply.

To reference the codename across workbooks you can either loop through the sheets and test codename property or use the VBCompents collection (although this needs the Trust settting enabled).

Either way you can then wrap it up in a function.

Please Login or Register  to view this content.

If you use the function to return an object reference then

Please Login or Register  to view this content.

Yes, assuming you declare the object at the top of the code module.