Solving Error 438

Hi Gurus/Experts,

I have written the following codes which assign worksheet, if available, to "tempo". I am now trying to write a code that checks if the "tempo" has worksheet object. And if it is present, it exits the "For Loop".

Please Login or Register  to view this content.

Currently, when the code tries to execute Line "If tempo <> Empty Then Exit For", it gives Error 438. Can you please advise me the proper code?

Appreciate your time and help.

Thank you
Roshan

slm = 2 digits last month
lm = 3 character last month
cy = four digits current year

Anyway thank you TMS for your solution.