Run-time error 13: Type mismatch

[bobkap]

I have a macro running through 300+ rows of data just fine then suddenly I get the Type Mismatch error and I just cannot figure out why. Here's the portion of my code that's causing this. It bombs out on the If statement. Any help would be most appreciated.

rownum = 2
counter = 2
For counter = counter To finalrowd
If Worksheets("data").Cells(rownum, paid) = "Paid" And Worksheets("data").Cells(rownum, finalcol + 4) <= Worksheets("data").Cells(rownum, salesprice) And Worksheets("data").Cells(rownum, finalcol + 3) = "WLCRdM" Then
comm2 = Worksheets("data").Cells(rownum, amount) * com2
Worksheets("data").Cells(rownum, finalcol + 2) = comm2
End If
rownum = rownum + 1
Next counter

 

[Trebor76]

Can't tell for certain without knowing how you set all your variables, but one thing to check is that there's no cells in error (like #N/A) for the range you're using.

 

[Michael M]

Maybe you need to post ALL of the code.
In the code provided, you don't explain the variables....paid,finalcol,salesprice,amount !!!