VBA Code Runs in Debug Mode But Returns Type Mismatch Error Outside Debug Mode

Hi guys

I have the following code that runs only in debug mode but returns a type mismatch error..

EndRow = Sheets("Data_Main").Range("D" & Rows.Count).End(xlUp).Row
c1 = 2

For k = 2 To EndRow
If (Sheets("Data_Main").Range("D" & k) = Range("A1")) Then
Range("I" & c1) = Sheets("Data_Main").Range("A" & k)
c1 = c1 + 1
End If
Next k

A very similar snippet of code (in the same project) runs perfectly fine outside of break mode.. I'm really puzzled. I know that DataMain is a large dataset (40000) rows or so. Could that possibly lead to this kind of error?

EndRow = Sheets("Territory_Rules").Range("A" & Rows.Count).End(xlUp).Row
c1 = 2

For k = 2 To EndRow
If (Sheets("Territory_Rules").Range("A" & k) = Range("A1")) Then
Range("A" & c1) = Sheets("Territory_Rules").Range("B" & k)
Range("B" & c1) = Sheets("Territory_Rules").Range("C" & k)
Range("C" & c1) = Sheets("Territory_Rules").Range("D" & k)
c1 = c1 + 1
End If
Next k

Hi, thanks for your response! k and EndRow are both declared as Long!

Here's the rest of the code! I've highlighted the problem area..

Please Login or Register  to view this content.

Thanks for your suggestion! I implemented it and got the same error.. Do you have any other ideas? I don't want to post the sheet because it's for a marketing class, and we're working with client information..

All of the cells are formatted as "general." I can't think of why this wouldn't work..

ahh ok, thank you very much!! some of the data values in the column were #N/A.

thanks again