Herbers Excel-Forum - das Archiv

Anzahl ermitteln

Bild

Betrifft: Anzahl ermitteln
von: Jürgen
Geschrieben am: 11.12.2003 16:28:59
Hallo,
ich habe folgendes Problem: in Zelle A1 steht 5
in Zelle A2 steht 3
in Zelle A3 steht 5 usw.
wir kann ich z.B. in Zelle A4 ermitteln, wieviele (also die Anzahl) 5 insgesamt vorkommen?
Danke

Bild

Betrifft: ZÄHLENWENN (oT)
von: xXx
Geschrieben am: 11.12.2003 16:31:05
Bild

Betrifft: ZÄHLENWENN
von: ChrisL
Geschrieben am: 11.12.2003 16:32:23
Hi Jürgen

Schau dir mal die Funktion ZÄHLENWENN an. Allenfalls könnte auch eine Pivot-Tabelle helfen, sofern du die Anzahl für alle Einträge bestimmen musst.

http://www.hrz.uni-dortmund.de/S1/download/skripte/s3/excel/Pivottabellen_in_Excel.pdf

Gruss
Chris
Bild

Betrifft: AW: Anzahl ermitteln
von: Harry
Geschrieben am: 11.12.2003 16:38:39
Hallo Jürgen,

Vielleicht hilft Dir das:



Sub test()
Dim intRow As Integer
Dim intCounter As Integer
For intRow = 1 To 50
If Cells(intRow, 1).Value = "5" Then
intCounter = intCounter + 1
End If
Next intRow
MsgBox intCounter
End Sub



Dabei werden die ersten 50 Zellen in Spalte A durchsucht.

Gruß Harry
Bild

Betrifft: AW: Anzahl ermitteln
von: Jürgen
Geschrieben am: 11.12.2003 18:10:26
Hallo,
hat funktioniert, vielen Dank.
Jürgen
Bild
Excel-Beispiele zum Thema " Anzahl ermitteln"
Seitenanzahl eintragen Funktion ANZAHL2 ohne ausgeblendete Spalten
Anzahl der über ParamArray festgelegten Parameter Anzahl eines bestimmten Wochentages im Monat
Anzahl der einzufügenden Zeilen abfragen Bestimmte Anzahl von Zeichen zulassen
Seitennummer und Seitenanzahl per VBA in Kopfzeile Nur AJM in TextBox akzeptieren und Anzahl zählen
Anzahl von CheckBoxes in einer UserForm ermitteln Anzahl der gelb hinterlegten Zellen ermitteln