Change sheet error

Hello everyone, I hope I'm posting this in the correct area.

I have Excel XP version installed on my system.

I have an excel workbook with 2 sheets, the 1st & main sheet is called Parking Receipt, & the second sheet is named Card Holders.

Sometimes when I edit the Card Holders sheet I save my work & close out excel. The problem is the next time I open the parking file I have a macro set to run automatically using the Parking Receipt sheet but the Card Holders sheet is the active sheet.

I wrote a routine to check the active sheet & change to the correct one but I keep getting an error message when it comes to this line in the code:

Please Login or Register  to view this content.

Error Msg: runtime error '438':
Object doesn't support this property or method


My Code:

Please Login or Register  to view this content.

I would just use

Please Login or Register  to view this content.

but maybe

Please Login or Register  to view this content.

VBA Noob