Use Sheetname as Vlookup lookup_value

I'm a bit flaky on VBA but I think you ought to be able to set up a Worksheet Activate bit of VBA that stored the worksheet name in a cell which you can then easily reference in your vlookup.

Something like ...

Range("A1").Formula = ActiveSheet.Name

... would put the current worksheet name into cell A1.

Each time you returned to the worksheet, the cell would be updated but this is a tiny overhead.