VBA Keeps Failing due to Range Maybe?

[menor59]

THis Keeps Failing...

Any Ideas...is it because of the Range??

Sub InsertFormulaReaders()
Dim i As Long
For i = Sheets("Ignore1").Index + 1 To Sheets("Ignore2").Index - 1
Sheets(i).Unprotect
Sheets(i).Range("L3:L").Formula2 = "=UPPER(IF(G3<>"""",""("" & $D$3 & "") "" & G3 & """" & H3 &"""",""""))"
Sheets(i).Protect
Next
Call InsertFormulaRDR
End Sub

 

[Norie]

The address in Range is incomplete, you are missing the end row.

Which rows in column L do you want to put the formula in?

 

[rlv01]

Sheets(i).Range("L3:L").Formula2 =

The second L needs a row number. Example:

Sheets(i).Range("L3:L100").Formula2 =

 

[menor59]

silly me...Thank you!