Anzahl ermitteln

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
MsgBox
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

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