Çalışma zamanı hatası Sütun çarpımı için 1004 döngüde

Question

İki sütun bir if else ifadesi ile çarpmak için bir kod tasarladım ama L = Cells(i, "L").Valueerror 1004 alıyorum Bu nedenle neden oluyor bir miktar açıklama gerekiyor. Bu kod!

Sub IfCalculationEq1() 

    Dim lastrow As Long 

    Application.ScreenUpdating = False 
    Dim i As Long 
    Dim L As Long 
    Dim E As Long 


    lastrow = Cells(Rows.Count, "L").End(xlUp).Row 

    L = Cells(i, "L").Value 
    E = Cells(i, "E").Value 

    For i = 3 To lastrow 

    If Cells(i, "K").Value = "-" Then 

    Cells(i, "N").Value = "-" 

    Else 

    Cells(i, "N").Formula = "=L*E" 

    Application.ScreenUpdating = True 

    ' If k is null then no action required or else L1*E3 

    End If 

    Next 

End Sub 

Answer 1

i hattı L = Cells(i, "L").Value de unititialized, bu nedenle hücre dizisi 1 dayanır 0 değeri vardır.