How to trap for error code 3161?

[rglman]

I am trying transfer data from an Excel spreadsheet using the TransferSpreadsheet action. If the password protected excel file is not open I get an error message "#3161 Could not decrypt file." The excel file has to remain password protected, so I would like to add an error trapping routine to display a message to the user that they must open the excel file in excel before importing.

I just don't know how to do the condition? Any help would be GREATLY appreciated!

 

[rglman]

Thanks for the GREAT advice!

I have jumped into vba, and I will probably not use macros much in the future! Now I have to ask myself why didn't I start learning vba sooner??!!