Best use of If, Else, ElseIf in my condition

[ItalianPlatinum]

Looking for the best way to accomplish this. Is someone able to assist?

I only want to apply formulas if the data is greater than 2 (with header). So if it is then one formula if a range is defined or another formula if it isnt. seems simple but I can't seem to master it. If range is less than 2 then no formulas to be applied (just skip over them).

if there is data for the formula then apply said formulas

If WsALL.Range("A" & rows.count).End(xlUp).row > 2 Then

apply this formula if BulkList = ""

.Range("B2:B" & lr3).Formula2 = "=IFERROR(COUNTIF(ALL!$D$2:$D$" & lr2 & ",A2),0)"

but apply this formula if Bulklist <> ""

.Range("B2:B" & lr3).Formula2 = "=0"

 

[ItalianPlatinum]

Ok I think I got it. Thanks for any that were looking at it. Some trial and error - with probably some luck got me there

Here it is if anyone else in the future needs it.

If WsALL.Range("A" & rows.count).End(xlUp).row < 2 Then
    .Range("B2:B" & lr3).Formula = "=0"
    .Range("C2:C" & lr3).Formula = "=0"
ElseIf BULKlist = "" Then
    .Range("B2:B" & lr3).Formula2 = "=IFERROR(COUNTIF(ALL!$D$2:$D$" & lr2 & ",A2),0)"
    .Range("C2:C" & lr3).Formula = "=if(B2=0,0,COUNTA(UNIQUE(FILTER(ALL!$P$2:$P$" & lr2 & ",ALL!$D$2:$D$" & lr2 & "=A2)))-COUNTIFS(ALL!$D$2:$D$" & lr2 & ",A2))"
ElseIf BULKlist <> "" Then
    .Range("B2:B" & lr3).Formula2 = "=IFERROR(COUNTIFS(ALL!$C$2:$C$" & lr2 & ",BULKlist,ALL!$D$2:$D$" & lr2 & ",A2),0)"
    .Range("C2:C" & lr3).Formula = "=if(B2=0,0,COUNTA(UNIQUE(FILTER(ALL!$P$2:$P$" & lr2 & ",ALL!$D$2:$D$" & lr2 & "=A2)))-COUNTIFS(ALL!$D$2:$D$" & lr2 & ",A2))"
End If