Runtime Error -2147417848 (80010108)

D

dalian1803

Hi guys,

I'm new here so please bear with me.

I have a macro that doesn't do much except open a workbook and copy
some sheets into the active workbook, in the following way:

Set Wbk = Workbooks.Open(Filename:="P:\Finance\Reporting\Machine
Efficiency\" & Year(Date) & "\Total Cost.xls", UpdateLinks:=0,
ReadOnly:=True)

ThisWorkbook.Sheets("Variable Costs").Delete
Wbk.Sheets("Variable Costs").Copy After:=ThisWorkbook.Sheets("Total
Production")

It's been working properly for a while but suddenly its has stopped
working - now when I try to run the macro the whole thing crashes and I
get the following error message -

Runtime Error -2147417848 (80010108)
Automation Error
The Object Invoked has disconnected from its clients.

Has anyone seen this error message before?

TIA for your help,

dalian
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top