Warning: file_get_contents(/data/phpspider/zhask/data//catemap/0/vba/16.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Excel中的VBA代码,参数非可选,CountIf错误_Vba_Excel_Countif - Fatal编程技术网

Excel中的VBA代码,参数非可选,CountIf错误

Excel中的VBA代码,参数非可选,CountIf错误,vba,excel,countif,Vba,Excel,Countif,我创建了一个代码来查找Sheet27中a列中数字1的实例,但它不断给出错误“参数非可选”,并突出显示代码的CountIf部分。我希望此信息显示为msgbox Private Sub CommandButton1_Click() Dim instances As Long instances = WorksheetFunction.CountIf(Sheets("Sheet27")(Columns("A:A"), "1")) MsgBox "We Found " &am

我创建了一个代码来查找Sheet27中a列中数字1的实例,但它不断给出错误“参数非可选”,并突出显示代码的CountIf部分。我希望此信息显示为msgbox

Private Sub CommandButton1_Click()

    Dim instances As Long
    instances = WorksheetFunction.CountIf(Sheets("Sheet27")(Columns("A:A"), "1"))

    MsgBox "We Found " & instances & " instances of ", vbInformation, "Alert"

End Sub
试试看


还想问我是否希望它计算多个条件,例如“2”和“3”,我应该如何修改代码。@SabaAli-
CountIfs
-这是另一个工作表函数。
instances = WorksheetFunction.CountIf(Sheets("Sheet27").Columns("A:A"), "1")