如何在VBA中将字符串比较与count-If合并

Question

我有一个If条件，用于检查ID号，开始日期和结束日期。 为此，如果要使用条件，我想添加一个字符串比较，以检查两个不同列中的True或False值。 我想知道是否可以为此创建另一个application.worksheetfunction.countif ？

    If Application.WorksheetFunction.CountIf(completed.Range(COLUMN_A_IN_COMPLETE & iTotRecsD), Val2) > 0 _
    And Application.WorksheetFunction.CountIf(completed.Range(COLUMN_B_IN_COMPLETE & iTotRecsB), Val1) > 0 _
    And Application.WorksheetFunction.CountIf(completed.Range(COLUMN_C_IN_COMPLETE & iTotRecsE), Val3) > 0 _
    And (StrComp(Val4, Val5) = 0) Then

即使值完全相同，此代码也仅在运行。

编辑* Val4是worksheet2.Cells（第2行，第4列）Val5是worksheet1.Cells（第2行，第4列）

And Application.WorksheetFunction.CountIf(completed.Range(COLUMN_D_IN_COMPLETE & iTotRecsF), Val4) > 0 Then

对于字符串比较来说似乎不太有效，我想知道为什么吗？

Answer 1

而不是使用多个countIf，而是由单个countIf完成。

    If (Application.WorksheetFunction.CountIfs(completed.Range(COLUMN_A_IN_COMPLETE & iTotRecsD), Val2, _
        completed.Range(COLUMN_B_IN_COMPLETE & iTotRecsB), Val1, _
        completed.Range(COLUMN_C_IN_COMPLETE & iTotRecsE), Val3, _
        completed.Range(COLUMN_D_IN_COMPLETE & iTotRecsF), Val4)) > 0 Then

现在可以使用了。 :)