Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 16:39:53
Ergebnisse nach rechts ausgeben
16.10.2025 13:18:36
Übersicht von Excel Konstanten
16.10.2025 11:48:44
Makro von Excel in Word aufrufen
16.10.2025 11:16:26
SUMMEWENN erweitern
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1924to1928
1924to1928
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Mit Makro "Zählenwenn" Formel eingeben

Forumthread: Mit Makro "Zählenwenn" Formel eingeben

Mit Makro "Zählenwenn" Formel eingeben
03.04.2023 09:25:25
Oinotna

Liebe Community
Ich als absoluter Neuling in der Makrowelt komme nun mit meinem kleinen Projekt an meine Grenzen und hoffe hier ein wenig Unterstützung zu kriegen.
Bin eigentlich schon ziemlich weit gekommen und nun gehts um eine Zusammenfassung.

Ich sage mal, was ich machen würde, wenn ich nur mit der Tastatur arbeiten würde. Weiss nicht ob das reicht.

1. gehe zu Zelle B1
2. "control+downtaste" (da gehe ich zur untersten B Zelle mit Inhalt)
3. 3x die Downtaste
4. Hier bin ich bei der Zelle B125 - da die Tabelle Tag für Tag variiert, kann es morgen Zelle B88 oder B258 sein. (Darum der zweite Schritt oben)
5. Ich gebe in diese Zelle folgende Formel ein: "=ZÄHLENWENN(D:D;"Birnen")-Ergebnis von zwei Zellen weiter unten (Punkt 9 oder in diesem Fall B127)"
6. Enter
7. "=Zählenwenn(D:D;"Äpfel")"
8. Enter
9. "=Zählenwenn(E:E;"UB*")" --> UB* weil, alles was mit UB beginnt soll gezählt werden.


Was denkt ihr, ist hier die leichteste Lösung?

Anzeige

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Mit Makro "Zählenwenn" Formel eingeben
03.04.2023 09:38:22
UweD
Hallo

so?
Sub Obst()
    Dim LR As Long
    
    LR = Cells(Rows.Count, "B").End(xlUp).Row 'letzte Zeile der Spalte
    
    Cells(LR + 3, 2).FormulaR1C1 = "=COUNTIF(C[2],""Birnen"")-R[2]C"
    Cells(LR + 4, 2).FormulaR1C1 = "=COUNTIF(C[2],""Äpfel"")"
    Cells(LR + 5, 2).FormulaR1C1 = "=COUNTIF(C[3],""UB*"")"
    
    
End Sub
LG UweD


Anzeige
AW: Mit Makro "Zählenwenn" Formel eingeben
03.04.2023 11:18:49
Oinotna
@Uwe
Schon ein gutes Stückchen näher :-)
Die Zählenwert Formel wird aber unmittelbar unterhalb der untersten Zelle aufgeführt. Die 3xDowntaste fehlt da (Punkt 3)
Kann man zusätzlich noch die Zelle mit dem Ergebnis von Punkt9 aktivieren? Möchte von da aus noch mit den Cursortasten andere Zellen Beschreiben. :-)

Lome 23266283810005508 Äpfel UC
Lome 23329219020005508 Äpfel UC
Lome 23392143850005508 Äpfel UC
Lome 23309484950005508 Äpfel UC
Lome 23247918870005508 Birnen UC
25
5


Anzeige
AW: Mit Makro "Zählenwenn" Formel eingeben
03.04.2023 12:10:37
UweD
HAllo

das kann nicht sein.
Durch das LR+3 wird die Zelle 3 tiefer mit der Formel beschrieben.

Ergänze noch..
Cells(LR + 5, 2).select
LG UweD


AW: Mit Makro "Zählenwenn" Formel eingeben
03.04.2023 12:31:31
Oinotna
Kuul
Danke :-)

jetzt ists gut.

Habs so gemacht

  Sub Obst()
      Dim LR As Long
      LR = Cells(Rows.count, "B").End(xlUp).Row 'letzte Zeile der Spalte
      Cells(LR + 6, 2).FormulaR1C1 = "=COUNTIF(C[2],""Birnen"")-R[2]C"
      Cells(LR + 7, 2).FormulaR1C1 = "=COUNTIF(C[2],""Äpfel"")"
      Cells(LR + 8, 2).FormulaR1C1 = "=COUNTIF(C[3],""UB*"")"
      Cells(LR + 8, 2).Select
  End Sub


Anzeige
AW: Mit Makro "Zählenwenn" Formel eingeben
03.04.2023 12:42:34
Oinotna
Ah ok, macht sinn.
es hat vorhin nicht geklappt, weil die Spalte A gefiltert war. Also muss ich zuerst den Makro ausführen und dann filtern. Dann gehts mit deinem ursprünglichen Code


Prima. Danke für die Rückmeldung. owT
03.04.2023 13:00:46
UweD


Anzeige
AW: Mit Makro "Zählenwenn" Formel eingeben
03.04.2023 10:05:01
Daniel
Hi
with Range("B1").end(xldown)
    .Offset(3, 0).FormulaR1C1 = "=CountIf(C4,""Birnen"")"
    .Offset(4, 0).FormulaR1C1 = "=CountIf(C4,""Äpfel"")"
    .Offset(5, 0).FormulaR1C1 = "=CountIf(C5,""UB*"")"
end with
Gruß Daniel


AW: Mit Makro "Zählenwenn" Formel eingeben
03.04.2023 11:25:06
Oinotna
Danke Daniel
irgendwie funktioniert das überhaupt nicht bei mir. Sorry, befasse mich erst seit drei Tagen mit diesem Thema :-)


Anzeige
AW: Mit Makro "Zählenwenn" Formel eingeben
03.04.2023 12:16:06
Daniel
Hi
dann solltest du mal eine Beispieldatei hochladen, in der du zeigst wie die Daten vorliegen (ggf Datenschutz beachten) und wie du dir für diese Daten das Ergebnis vorstellst.
Dann bekommst du in der Regel auch funktionierenden Code als Antwort.
Gruß Daniel


Anzeige
AW: Mit Makro "Zählenwenn" Formel eingeben
03.04.2023 12:52:43
Wolfgang
Hallo Oinotna,

nun versuchte ich eine Tabelle nach dem Muster von dem ersten Beitrag zu erstellen und die Hilfen von hier mit den Makros einzubauen. Es mag ja sein, das alle Makros zwar sehr gut funktionieren, aber leider Deine Ansprüche nicht entsprechen (auch bei mir), das ist meine Meinung. Die Ergebnisse sind in Zellen vorhanden, die eigentlich als "Datensatz/Abfrage" gelten sollen, also sollten die schon bestehen bleiben und das Ergebnis sollte da stehen, wo es hingehört.
Warum gibt es keine "Mustertabelle", dann kann man mehr "nachvollziehen" und lösen oder du änderst die Vorschläge so, dass es Dir paßt (geht auch, aber umständlich) und hilft vielleicht anderen Excel-Usern mit gleichen/änlichen Problemen.
Gruß
Wolfgang

Anzeige
;

Forumthreads zu verwandten Themen

Zählenwenn oder ?
Astrid

Ich brauch auch mal Euren Rat!
Ich bin nicht so ausgefuchst wie Ihr, aber ich versuch mich zu bilden*
Mein Problem:
Spalte A steht eine farbe "rot" oder "weiss" z.b.
Spalte B steht eine Zahl 1 oder 2 o. 3
Spalte C soll nun das Ergebnis stehen:
wenn in Spalte A die Farb...
04.08.2009 11:09:23
Thread-ID: 1093431
4 Beiträge
Formel umstellen, Wenn L = X, nicht zählen
Wolfgang

Hallo,
Ich hatte schon in einem anderen Thread die Möglichkeit, nachstehende Formel umzustellen, hinterfragt. Allerdings hatte ich das mit "pre" nicht im Griff. Habe das jetzt versucht, zu beherzigen. Die Frage, die ich nicht hinbekomme, ist, wie ich die nachstehende Formel umstellen kann:...
06.03.2010 08:39:44
Thread-ID: 1143874
3 Beiträge
Zählennwenn Formel
webmaster@heliofix.de

Hallo und einen schönen Tag!
Wie kann ich die Formel verändern wenn ich in verschiedenen Zellen zählen möchte.
=zählenwenn(e5;"F6")
Ich brauche auch die Zellen e7, e9, e12 u.s.w.
Danke für die Bemühungen...
23.04.2010 15:09:22
Thread-ID: 1153522
4 Beiträge
Zählenwenn/Summenprodukt Formelproblem
SteffenS

Hallo Zusammen,
ich habe folgende Formel in meiner Zelle:
=SUMMENPRODUKT(([bl_ct_dt.xls]db_dt!$N$2:$N$20000>=-9999)*([bl_ct_dt.xls]db_dt!$N$2:$N$20000 Leider habe ich dabei das Problem, dass als Ergebnis: 19826 herauskommt, obwohl ich im Bereich nur
einen Wert habe und dieser -3...
07.06.2010 20:44:13
Thread-ID: 1160743
3 Beiträge
Verschachtelte Zählenwenn-Formel
Jan

Hallo,
ich verzweifel gerade an einer doppelten Zählenwenn-Formel, bekomme sie nicht ans Laufen.
Ich habe beispielhaft folgende Tabelle erstellt:
A 14.11.10
B 12.12.10
U 15.1.11
A 31.1.11
U 25.2.11
B 15.10.10
C 9.11.10
A 28.12.10
A 1.1.11
Ich m...
02.12.2010 10:29:53
Thread-ID: 1189697
5 Beiträge
zählenwenn mit oder
jockel

Hi,
Ich mőchte eine Funktion schreiben, mit der ich zb in einer Spalte alle "Auto" zählen kann. Ok, mit zählenwenn.
Kann ich in diese Funktion auch ein Oder machen ?
Also ich möchte alle "Auto" ODER "Haus" zähle.
Zweite Frage: wie zähle ich, die NICHT "Auto" sind ?
Danke
...
26.05.2011 17:35:08
Thread-ID: 1216182
3 Beiträge
Zählenwenn-Formel bei gefilterten Tabelle
Stef@n

Hallo Excel-Freunde,
irgendwie stehe ich auf dem Schlauch.
Ich habe eine Datei, in der Werte aus einer Tabelle mit der Formel Zählenwenn gezählt werden.
Wenn ich die Datei jedoch mittels Autofilter - z.B. alle Donnerstage - auswähle,
ändert sich nicht die Ergebnisse - also die n...
28.10.2011 15:23:06
Thread-ID: 1235819
5 Beiträge
Zählenwenn Formel
Dani

Hallo zusammen
In einem Thread von 2003 habe ich folgendes gefunden:
Thread =ZÄHLENWENN(A:A;"Hallo")+ZÄHLENWENN(Tabelle2!A:A;"Hallo")+ZÄHLENWENN(Tabelle3!A:A;"Hallo") Ich muss in Tabellenblättern über das ganze Jahr suchen, das heisst, jedes Tabellenblatt hat den Monatsnamen. Nun habe...
02.01.2012 23:12:08
Thread-ID: 1244310
3 Beiträge
Anzeige
Zählenwenn-Formel vereinfachen
Golem

Hallo Excel-Anwender!
Meine Frage ist, ob folgende Formel vereinfacht werden kann. Mit ZÄHLENWENNS schon versucht, aber keinen Erfolg.
Ich bin noch in der Lernphase und deshalb auf weitere Hilfen sehr verlegen.
Es werden in mehrere Arrays die Anzahl einer bestimmten Zahl gesucht und...
21.05.2012 21:16:54
Thread-ID: 1264267
9 Beiträge
Nummerierung mit Bedingung
Manfred

Hallo zusammen,
ich suche eine Formel zum automatischen Nummerieren der Spalte A Z5.
Nummeriert darf nur werden wenn die Schriftfarbe in Spalte B Schwarz ist, ist die Schrift Rot oder auch wenn nichts drin steht darf nicht nummeriert werden.
Ein Makro
Mit freundlichen Grüßen
10.04.2013 16:35:03
Thread-ID: 1308200
8 Beiträge
Bitte um Änderung einer ZÄHLENWENN-Formel
Jenny

Hallo alle zusammen,
es wäre super lieb von euch, wenn sich jemand bereit eklärt, folgende Formel ein wenig zu erweitern
=WENN(ODER(C2="";D2="";ZÄHLENWENN(Tabelle1!C$1:C$20000;"*"&C2&"*"&D2&"*") +ZÄHLENWENN(Tabelle1!C$1:C$20000;"*"&D2&"*"&C2&"*")=0);"FALS...
08.06.2013 21:27:20
Thread-ID: 1316762
12 Beiträge
Bitte um Hilfe bei ZÄHLENWENN-Formel
Christian

Hallo an alle,
bitte helft mir. Habe die soweit funktionierende Formel =ZÄHLENWENN(Tabelle3!A1:A20000;B2)
suche nun eine Möglichkeit, dass alle Zellen gezählt werden, bei denen B2 ein Teil des Textes ist, oder mit dem gesuchten Text identisch sind
Bin dann durch Recherche auf Lösun...
27.06.2013 12:01:59
Thread-ID: 1320041
3 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige