Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1696to1700
1696to1700
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Anzeige
Inhaltsverzeichnis

Zählen wenn eine von zwei Spalten nicht leer

Forumthread: Zählen wenn eine von zwei Spalten nicht leer

Zählen wenn eine von zwei Spalten nicht leer
14.06.2019 22:14:33
zwei
Hallo
ich habe folgende Bedingung 
For Each Zelle In Range("C10:C40").SpecialCells(xlCellTypeVisible)
If Zelle.Value  0 Then x = x + 1
Next
In den Zellen stehen Zahlen oder sie sind leer.
Ich möchte das aber jetzt erweitern es soll auch noch der Bereich D10:D40 geprüft werden.
In den Zellen steht ein Text oder nichts.
Letzen Endes soll gezählt werden wenn in C eine Zahl oder D ein Text steht.
Das Ergebnis vom Beispiel wäre 9
https://www.herber.de/bbs/user/130398.xlsx
Liebe Grüße
Silke
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: warum nicht einfach eine Formel? ...
14.06.2019 22:23:37
neopa
Hallo Silke,
... dann z.B. so: =SUMMENPRODUKT(((C10:C40"")+(D10:D40"")&gt0)+0)
Gruß Werner
.. , - ...
Als Formel würde auch diese reichen, ...
15.06.2019 04:21:38
Luc:-?
…Silke:
=SUMMENPRODUKT(--(C10:C40&D10:D40""))
Sie hat die gleichen Voraussetzungen wie Deine, Werner,
ist aber deutlich straffer.
Wollte man allerdings auch noch TextZahlen in C und D ausschließen, Silke & Werner,
könnte sie auch so aussehen:
=SUMMENPRODUKT(GANZZAHL((ISTZAHL(C10:C40)+ISTFEHLER(--D10:D40)+1)/2))
Wenn es aber unbedingt VBA sein soll, Silke,
kann letzteres (inkl Ausschluss ausgeblendeter Zeilen) auch hiermit erreicht wdn: 
    Const adRelBer$ = "C10:D40"
Dim x As Long, Zeile As Range
For Each Zeile In Range(adRelBer).SpecialCells(xlCellTypeVisible).Rows
With WorksheetFunction
x = x - CInt(.IsNumber(Zeile.Cells(1)) Or _
(.IsText(Zeile.Cells(2))) And Not IsNumeric(Zeile.Cells(2)))
End With
Next Zeile
Es darf aber keine der beiden Spalten ausgeblendet wdn!
Morhn + schöWE, Luc :-?
„Der beste Beweis für intelligentes Leben im Universum ist, dass noch niemand versucht hat, Kontakt mit uns aufzunehmen.“ H.Lesch, 2018, Sonneberg
Deshalb Intelligenz steigern mit …
Anzeige
AW: Zählen wenn eine von zwei Spalten nicht leer
15.06.2019 01:21:46
zwei
Hi
if Zelle.Value  0 or Zelle.Offset(0, 1).value  "" then x = x + 1
oder 
if Zelle.Value & Zelle.Offset(0, 1).value  "" then  x = x + 1
oder
If Worksheetfunction.CountA(Zelle.Resize(, 2)) > 0 Then x = x + 1
Gruß Daniel
Anzeige
AW: Zählen wenn eine von zwei Spalten nicht leer
15.06.2019 15:24:08
zwei
Vielen Dank für eure Hilfe,
ich habe die Variante von Daniel verwendet .. die funktioniert prima.
LG
Silke

Forumthreads zu verwandten Themen

ZählenWenn ohne Duplikate, mehrere Werte pro Zelle
Seni

Guten Tag zusammen,
ich habe eine Formel mit welcher alle Werte in meinem Bereich welche ein P enthalten gezählt werden, wobei doppelte Werte nur einmal gezählt werden.
Das sieht dann vielleicht so aus:
3001P
3000P
2999P
3001P
=3
Formel: =SUMME(WENN(ISTZAHL(SUCH...
26.10.2018 16:16:58
Thread-ID: 1653752
2 Beiträge
Anzeige
Zählen ohne Duplikate
Burak

Guten Morgen,
wollte mal fragen ob es eine einfache Einstellung im Count- bzw. CountIf-Befehl dass er Anzahl der befüllten Zellen OHNE duplikate zählt?
Betrifft die Sheets "R1", "R2", "R3", "R4" und "R5" jedes mal Spalte B.
Oder muss man das über copy paste, sortieren und rausfilter...
19.01.2018 09:02:18
Thread-ID: 1603236
3 Beiträge
Anzahl Namen ohne Duplikate zählen
TomHoff
Hallo zusammen
Ich versuche eigentlich völlig einfach die Anzahl sämtlicher Spieler aus einer Tabelle zu zählen wobei die doppelten nur einmal gezählt werden sollen.
Hier ein Screenshot der Beispiel-Tabelle

(Also "Hans" und "Alex" sollen nur einmal gezählt werden da sie in allen Gru...
08.01.2023 16:26:58
Thread-ID: 1914667
1 Beitrag
Zählenwenns ...
KM

Hallo Forum,
noch eine letzte Frage:
=ZÄHLENWENNS(D2:D11;G2;E2:E11;"") sollte für mich heißen:
Schaue in Spalte D, ob das Kriterium Gx vorhanden ist. Zähle nur die Anzahl der Vorkommen, wenn Spalte es ungleich leer ist.
Leider zählt die Formel auch die leeren Felder.
https...
27.02.2012 16:55:29
Thread-ID: 1252650
3 Beiträge
Erweitern einer Formel über VBA
Niko
Hallo zusammen,

so langsam stoße ich an meine Grenzen bezüglich Excel und VBA.

Kurze Beschreibung:

Meine Userform2 beinhaltet eine TextBox1 und einen CommandButton1. Über VBA soll nun nach betätigen des Button1 geprüft werden, ob der Eintrag in der TextBox1 in der Tabelle...
10.04.2024 19:23:15
Thread-ID: 1972973
25 Beiträge
leere Zeile in variabler Range suchen
meixner

Hallo zusammen,
wenn eine leere Zelle in einem variablen Bereich gefunden wird, dann nehme den Wert aus der vorherigen Zelle und schreibe diesen Wert in die leere Zelle.
Mit unterem Makro komme ich nicht weiter, da der Bereich fix angegeben ist, während der Bereich eigentlich variabel i...
23.11.2009 21:38:33
Thread-ID: 1119561
2 Beiträge
2 datenblätter vergleichen und INhalt kopieren
Kay

Hallo,
ich hab folgendes Problem:
Ich muss 2 Datenblätter miteinander vergleichen und den Zellinhalt bei Übereinstimmung eines Datenblattes in das anderer kopieren.
FOlgendes Makro hab ich bereits entwickelt, erreicht aber leider nicht das gewünschte Ergebnis.
Sub Makro8() z =...
21.09.2005 20:55:17
Thread-ID: 670620
4 Beiträge
Zelle suchen und Inhalte löschen - per Makro
Tom

Hallo, liebe Excel-Freunde,
bereits zweimal hat man mir im Forum prima weiter geholfen. Ich habe noch eine drittes (und wohl vorläufig letztes) Problem zu lösen.
Es geht im Prinzip um folgende Aufgabenstellung:
In Tabelle2 gibt es eine umfangreiche Datei (A1:C500). In Tabelle 1 wird...
22.03.2009 22:37:43
Thread-ID: 1062727
4 Beiträge
Anzeige
Summenprodukt
Timo

Hallo ihr fleißigen Helfer,
habe in Excel folgendes Problem:
Gegeben ist eine Terminverwaltungstabelle, in der für jeden Termin 3 Spalten nach folgenden Muster existieren: 1. Spalte: Termin (Datum); 2. Spalte: Termin-Uhrzeit bzw. Thema (Zahl oder Text) und 3. Spalte: Bemerkungen (Text)...
06.10.2009 11:05:37
Thread-ID: 1107430
2 Beiträge
Summewenn
Frank

Hallo,
ich habe folgendes Problem. Wenn im Bereich F9:AJ9 die Zelle ungleich leer ist, dann soll aus dem
Bereich F12:AJ12 die Summe gebildet werden. Ich habe es mit folgenden Beispielen versucht:
=SUMMEWENN($F$9:$AJ$9;$F$9:$AJ$9"";$F$12:$AJ$12), oder
=SUMMEWENN($F$9:$AJ$9;"""";$F$12...
17.07.2003 13:44:11
Thread-ID: 282151
5 Beiträge
Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.05.2026 19:23:24
VBA - Blattschutz lässt sich mit Code nicht ausschalten
17.05.2026 13:47:03
Laufende Uhrzeit in einer Zelle
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum