Unable to get Countifs property of the function class error

[Drawleeh]

Hello, I am getting the aforementioned error with my code, and I have absolutely no clue why. Any help would be appreciated I'm clearly not understanding something.

[CODE=vba]Sub MonthlyAdd()
Dim Category(7 To 10) As Variant
Dim Ar As Variant
Dim Br As Variant
Dim Catgry As String
Dim i As Long
Dim k As Long
Dim Comp As Variant
Dim tot As Long
Dim item As Variant


For k = 2 To 13



Ar = Worksheets("Log").Cells(k, 6).Value2



Br = Application.WorksheetFunction.EoMonth(Worksheets("Log").Cells(k, 6), 0)

For i = 7 To 10



Category(i) = Worksheets("Log").Cells(1, i).Value

Catgry = Category(i)

With Worksheets("Log")
    Cells(k, i) = Application.WorksheetFunction.CountIfs( _
    .Range("C3", .Range("C3").End(xlDown)), "=" & Catgry & "*", _
    .Range("A3", .Range("A3").End(xlDown)), ">=" & Ar, _
    .Range("A3", .Range("A3").End(xlDown)), "<=" & Br)
End With

Next i


Next k

End Sub

 

[Candyman8019]

Not sure...do you need to add the value property, for example:
Cells(k, i).value = Application.WorksheetFunction.CountIfs( _

 

[RoryA]

A reminder:

Cross-posting (posting the same question in more than one forum) is not against our rules, but the method of doing so is covered by #13 of the Forum Rules.

Be sure to follow & read the link at the end of the rule too!

Cross posted at:

Countifs doesn't work with specified worksheet

Hello I have a some code that contains a CountIf formula. It worked fine when the range for the formula was the activesheet however now that I have attempted to specify a worksheet for the range su...

stackoverflow.com

If you have posted the question at more places, please provide links to those as well.

If you do cross-post in the future and also provide links, then there shouldn’t be a problem.