Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.04.2024 01:34:12
Userform aus ListBox Zeile in Tabelle farbig markieren
27.04.2024 20:04:34
Excel in Formen z.b Rechteck, eine Tabelle einfügen?
27.04.2024 19:23:05
Passwortabfrage für verschiedene tabellenblätter
27.04.2024 16:48:06
Formel gibt Falsch aus und ich weiß nicht warum - VBA
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1924to1928
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
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 Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

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?

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


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


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


Anzeige
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 :-)


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


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

57 Forumthreads zu ähnlichen 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
Anzeige
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
Anzeige
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
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
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
3
2
3
2
4
2
4
2
8
7
11
2
9
4
3
3
13
8
8
2
5
10
8
2
4