Private Sub zaehlen()
Dim zeile As Integer
Dim anzahl As Integer
Dim strinhalt As String

anzahl = 0
For zeile = 1 To 20
strinhalt = Tabelle1.Cells(zeile, 1)

If InStr(1, strinhalt, "Z") Then
anzahl = anzahl + 1
' Jetzt kannste mit der Zeile machen was Du willst
End If
Next
MsgBox anzahl
End Sub

Aber nur, wenn es egal ist, ob in derselben Zelle ein oder mehrere Z sind, es wird nur geschaut ob eins da ist oder nicht, nicht geschaut ob 2 oder 3 in derselben Zelle sind. Wenn Du das brauchst musst Du es sagen.

Gruß Marie

hi all

eine zu ergaenzende formel bzw benutzerdefinierte formel waere wohl angebrachter

gruss gast123

Hi 123,

ich verstehe nicht wieso Du ständig irgendwelche Antworten von mir kritisierst, statt die richtige Antwort zu geben, von der Du meinst, dass sie "angebrachter wäre". Mit Deiner Kritik an meiner Antwort kann der fragende nicht die Bohne anfangen.

Ich kenne mich in Excel nicht aus und habe auch nicht kapiert was er will, ausser den Zellinhalt zu ändern, wenn ein bestimmter Buchstabe vorkommt. Um das in eine Excelformel reinzuschustern fehlen mir die Excelkenntnisse, falls das überhaupt möglich ist. Also gebe ich ihm einen VBA-Code, den er sich anpassen kann.

Gib ihm die Antwort, von der Du meinst, dass sie angebrachter ist und lass ihn dann entscheiden, ob er das per Code leichter macht oder mit Deiner Antwort.

Gruß marie

Hallo Karsten,

ich verstehe Deine Frage wie folgt:

In A1:A20 stehen u.a. die Buchstaben Z, K, U und in A14 steht eine Zahl.

Nun willst Du die Anzahl der genannten Buchstaben ermitteln und diese mit dem Divisionsergebnis (A14/6) multiplizieren.

Diesen Akt würde folgende Formel erledigen:

=SUMME(ZÄHLENWENN(A1:A20;{"Z"."K"."U"}))*A14/6

Ansonsten sind konkretere Erklärungen Deinerseits nötig.

Gruß
Rainer

Hallo Marie, hallo Rainer,
danke für Eure schnellen Antworten. Sorry, ich konnte jetzt erst Antworten, mußte arbeiten.
Die ausführlichste Antwort war auch die längste. Die funktioniert sogar. Aber sie ist ein wenig komplex. Mit Excel Bordmitteln so wie Rainer sie beschreibt bekomme ich mein Problem einfacher in den Griff. Vielen lieben Dank an Euch beide, das Ihr mir geholfen habt. Kann mir trotz der Lösung meines Problems, noch jemand sagen wieso die o.g. Formel , aus meiner ursprünglichen Frage, das komische Ergebnis liefert. Möchtes es nur wissen, da ich ja auch noch lerne. Vielen Dank im voraus und noch eine schöne Adventszeit.
Gruß
Karsten

Hallo Karsten,

um die Frage beantworten zu können müsstest Du mal alle Werte hier auflisten, die im Bereich A1:A20 stehen.

Deine Formel ist richtig, vorausgesetzt Du hast ZÄHLENWENN und nicht ZÄHLEWENN geschrieben.

Gruß
Rainer

Hallo Rainer,
das wars. Man sollte schon richtig schreiben. Danke nochmal.
Eine schöne Adventszeit noch.
Viele Grüße
Karsten