Run Time Error 9

[smilelover]

For i = 1 To 100
    For j = 1 To 8
    [B]Sheets("5. SUPPLIER Freight INC").Cells(2 * i, j + 3) = Sheets("3. SUPPLIER DUTIES Repriced").Cells(2 * i, j + 3) + Sheets("4. Freight Per Unit").Cells(8 * i + j - 5, 43)[/B]
    Next j
Next i

The Code in bold are said to have error
Subscript out of range.

Any idea why?

 

[Trebor76]

Any idea why?

First thought is that though not case senitive, there is one (or more) tab(s) not named the same in the workbook as they are in the code.

 

[smilelover]

Don't think so, as I have copied them directly from the sheet itself (Rename the sheet and copy)

 

[smilelover]

Now it went to a different error call RunTime 13 error: Mismatch
I think thats because my code are all strings, and we can't suppose to do maths with strings, anything that I can do?

 

[Trebor76]

What range of cells are you trying link to the "5. SUPPLIER Freight INC" tab from which range from the other two tabs?

 

[smilelover]

Well I found out where my main problem is
My 4.FreightPerUnit Sheet has #VALUE after cells(200,43)
is there an IF function that can tell my code that if its #VALUE, then make my target Cell =0
If not, continue my original function

 

[villy]

Cells(8 * i + j - 5, 43)
is it range AQ4?
Check this one maybe causing the error about the subscript...

 

[villy]

try to add
On error GoTo Err1 in your code whereas Err1: target cell=0 resume next

 

[Trebor76]

I found out where my main problem is

That's what's causing the Run-time error '13:' error message but not your original Run-time error '9:' error message.

If you can tell me the ranges you're dealing with I dare say I may be able to provide some kind of solution (though it's getting late here in Oz).

 

[smilelover]

I am in Aus as well,
but I am fine already,
got it with my mate
The problem is I didn't add a .Value on some places
need to define where the #ERROR happens
and yes villy its in AQ4