Fully reference a worksheet by codename

Question

When I reference Excel worksheets using the CodeName property, how do I fully qualify them including the workbook reference?

I want to guard against a scenario with

Answer 1

Dim wb as Workbook
Dim ws  as worksheet

Set wb = "Your Workbook full path and name"

For each ws in wb.worksheets
    If ws.codename = "Your Codename" then exit for
    next ws

ws will now contain the reference to the worksheet in other workbook with the desired codename with no user changeable dependencies

Hope this helps