ZÄHLENWENNS VBA zählen von nicht leeren Zellen

Habe ich folgende VBA Formel zum zählen von nicht leeren Zellen in einem Bereich, plus einige andere Bedingungen in anderen Bereichen. Der Teil zum zählen von nicht leeren Zellen funktioniert nicht. Dies ist der Teil des Codes:

LAX(0) = Application.WorksheetFunction.CountIfs(Range("I:I"), "<>""", Range("AH:AH"), "LAX", Range("AG:AG"), ">=" & semanaI, Range("AG:AG"), "<=" & semanaF)

Sind die ersten beiden Argumente korrekt?

  • Seit Excel 2007 gibt es eine Funktion, die aufgerufen wird COUNTBLANK. Ist, dass jeder helfen? support.office.com/en-us/article/...
  • Nein, denn das ist nicht die einzige Bedingung muss erfüllt sein
  • Offenbar ist die COUNTIF Funktion unterstützt wildcards: support.office.com/en-gb/article/... Es ist auch ein Beispiel auf der Website, die Sie um Counts the number of cells containing any text[...]. Um sicherzustellen, dass mindestens ein Charakter in einer Zelle können Sie auch für die folgenden wildcard-Kombination: *?*.
InformationsquelleAutor N. Pavon | 2016-02-29
  1. 2

    Ich gelöst, indem Sie Folgendes tun:

    LAX(0) = Application.WorksheetFunction.CountIfs(Range("I:I"), "<>" & "", Range("AH:AH"), "LAX", Range("AG:AG"), ">=" & semanaI, Range("AG:AG"), "<=" & semanaF)
    InformationsquelleAutor N. Pavon
  2. 1

    Leider brauchen Sie ein wenig mehr Umgang mit deinem bedingt, denn Wenn eine Zelle in jedem argument ist eine leere Zelle, ZÄHLENWENNS behandelt es als 0-Wert.

    (REFERENZ, BRO: https://msdn.microsoft.com/en-us/library/microsoft.office.interop.excel.worksheetfunction.countifs.aspx?cs-save-lang=1&cs-lang=vb#code-snippet-1)

    So,

    Anwendung.WorksheetFunction.ZÄHLENWENNS( {range zu bewerten, Kriterien}, {criteria_1} ,{criteria_2},...)

    hierzu:

    Dim rCell as Range.Cells
Dim rRange as range

Set rRange = Range("I:I")

For Each rCell in rRange

    If { foo } Then
        'do stuff
    Elif { bar} 
        'do stuff
    Else { derp}
        'do stuff
    End If

Debug.Print rCell.Address, rCell.Value

Next rCell
    InformationsquelleAutor K Zombro
Schreibe einen Kommentar