Macro slow in Excel 2003 but not Excel 2007

[tgroneck]

I have a macro that, in one test, finished in under a minute with Excel 2007 and took 13 minutes in Excel 2003. I have narrowed it down to one section of code that takes all the time. Any thoughts?

On Error GoTo ErrHandler
For x = myRow To lRow
    Application.CutCopyMode = False
    myAddress = ThisWorkbook.Sheets("Master Lookup").Cells.Find(What:=accounts(x), After:=Range("A1"), LookIn:=xlValues).Address
    ThisWorkbook.Sheets("Master Lookup").Range(myAddress).EntireRow.Copy Destination:=Workbooks(fName).Sheets(1).Range("A65000").End(xlUp).Offset(1, 0)
    newRow = Workbooks(fName).Sheets(1).Range("A65000").End(xlUp).Row
    Workbooks(fName).Sheets(1).Range("G" & newRow).Value = amounts(x)
Next
On Error GoTo 0

 

[tgroneck]

Specifically, the line of code for "find" seems to be very slow.


myAddress = ThisWorkbook.Sheets("Master Lookup").Cells.Find(What:=accounts(x), After:=Range("A1"), LookIn:=xlValues).Address</pre>