VBA Help - Rewrite a VBA Formula - COUNTIF

[Johnny Thunder]

Hey guys, just need a little help rewriting this formula below,

Sub Duplicate_Val()


Dim lrow        As Long, ws1 As Worksheet


Set ws1 = Sheets("Datasource")
lrow = ws1.Cells(Rows.Count, "A").End(xlUp).Row 'Adjustments Lastrow


Application.Goto ws1.Range("L10")
With ws1
    .Range("$L$11:L" & lrow & "").Formula = "=COUNTIF($A:$A,A11)"
    .Range("L10").formula = "=COUNTIF($L$11:$L$ & lrow & ",""<""&1)"  'This line keeps getting an error on the "," part? 
    
End With


End Sub

 

[JoeMo]

Untested, but try:

.Range("L10").Formula = "=COUNTIF($L$11:$L$ & lrow & "",<""&1)"

 

[Marcelo Branco]

Maybe

.Range("L10").Formula = "=COUNTIF($L$11:$L$[B][COLOR=#ff0000]"[/COLOR][/B] & lrow & ",""<""&1)"

M.

 

[Johnny Thunder]

Thanks for the quick response on this. It still resulted in an error but the revisions @Marcelo Branco provided worked out.

Untested, but try:

.Range("L10").Formula = "=COUNTIF($L$11:$L$ & lrow & "",<""&1)"