Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema MsgBox
BildScreenshot zu MsgBox MsgBox-Seite mit Beispielarbeitsmappe aufrufen

Anzahl aus Filter auslesen

Betrifft: Anzahl aus Filter auslesen von: Yvonne
Geschrieben am: 30.08.2004 14:00:59

Hallo

Hab en grosses File mit Autofiltern. Nun möchte ich mit VBA abfragen, wieviele Einträge in der Spalte B mit dem Inhalt "Haus" sind und diese Nummer in der Variable mAnzahlHaus (Integer) speichern.
Wie kann man sowas anstellen?

Gruss
Yvy

  


Betrifft: AW: Anzahl aus Filter auslesen von: Roland Hochhäuser
Geschrieben am: 30.08.2004 14:16:05

Hallo Yvonne,
etwa so?:
Sub Zaehlen()
Dim mAnzahlHaus As Integer
mAnzahlHaus = WorksheetFunction.CountIf(Columns("B:B"), "Haus")
MsgBox mAnzahlHaus
End Sub

Gruß
Roland


 

Beiträge aus den Excel-Beispielen zum Thema "Anzahl aus Filter auslesen"