Hi,

Let me start with some assumptions:

Workbook_B = Workbook in which I am having the error
Workbook_A = Workbook that sends Workbook_B a range of cells in next blank row daily. (When this happens, Workbook Open() is skipped in Workbook_B. It can only run when Workbook_B is manually opened.)

When I open Workbook_B, the Workbook Open() code is supposed to make all blank cells truly blank, then delete all blank rows. However, I am receiving an error on Workbook Open() in "Workbook_B" that says:

Run-time error '1004':
Method 'Cells' of object'_Global' failed


It refers to the following code in Workbook Open():

Cells.Find(What:="", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
, SearchFormat:=False).Activate

I think this is because there isn't a qualified reference, but I really have no idea how to correct it. What's strange is that if I manually fire the code, it sometimes works.

Full code in Workbook_B:

Please Login or Register  to view this content.
Thanks for any help on this issue!