目前Excel公式

Question

我怎樣寫在VBA格式下面的公式？我嘗試了很多選項，但它們都會給編譯錯誤。

=COUNTFS(A2:A9,="2013",B2:B9,="Bikes") 

Answer 1

Excel公式：

=COUNTIFS(A2:A9,"2013",B2:B9,"Bikes") 

在VBA

：

Dim count As Integer 
count = WorksheetFunction.CountIfs(Range("A2:A9"), "2013", Range("B2:B9"), "Bikes") 

希望你在找這個？

Answer 2

的第一步是使用正確的公式：

=SUMPRODUCT((A2:A9=2013)*(B2:B9="Bikes")) 

和VBA，我們必須在雙引號!:翻倍

Sub dural() 
    Dim s As String 
    s = "=SUMPRODUCT((A2:A9=2013)*(B2:B9=""Bikes""))" 
    MsgBox Evaluate(s) 

    Range("C1").Formula = s 
End Sub