Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Anzahl der Zeilen mit bestimmten Inhalt
zurück: mehrere Werte für Pivotfilter setzen weiter: Benutzerdef. Ansicht mit Blattschutz Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Feedback Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Castiral
VBA-Halbwissender


Verfasst am:
30. Apr 2014, 12:43
Rufname: Cass
Wohnort: Hamburg

Anzahl der Zeilen mit bestimmten Inhalt - Anzahl der Zeilen mit bestimmten Inhalt

Nach oben
       Version: Office 2010

Hallo zusammen,

in meinem 1. Tabellenblatt habe ich ein ListObjects("Tabelle2").
Dort sind insgesamt 3 verschiedene Werte eingetragen, die Werte beginnen ab A3. Also kann man auch nur nach 3 Kriterien filtern.
1. Wert: "beendet"
2. Wert: "nicht begonnen"
3. Wert: "" (leere Zelle)"
Ich möchte jetzt die Anzahl der Zeilen für jede Bedingung (Filterung) in mein 2. Tabellenblatt eintragen lassen (in B4).

Wie kann ich das realisieren?
Ich möchte sehr ungern einen festen Bereich angeben, den er auf die Werte überprüfen soll.
Lieber wäre mit etwas wie z.b.
Code:
 Range("A3:A" & Range("A" & Rows.Count).End(xlUp).Row)



Ich habe schon versucht, die umzusetzen, aber es kommt nur Schwachfug raus Very Happy
Hier mein Versuch:

Code:

'Zeilen zählen  insgesamt
    Sheets("Tabelle2").Range("B4").Value = Sheets("Tabelle1").Cells(Rows.Count, 1).End(xlUp).Row + 1

    'Filter W beendet
    Sheets("Tabelle1").ListObjects("Tabelle2").Range.AutoFilter Field:=23, Criteria1:= _
        "beendet"
   
    'Zeilen zählen W beendet
    Sheets("Tabelle2").Range("B5").Value = Sheets("Tabelle1").Range("A3:A20000").SpecialCells(xlCellTypeVisible).Count

    'Filter W nicht begonnen
    Sheets("Tabelle1").ListObjects("Tabelle2").Range.AutoFilter Field:=23, Criteria1:= _
        "nicht begonnen"
   
    'Zeilen zählen W nicht gegonnen
    Sheets("Tabelle2").Range("B7").Value = Sheets("Tabelle1").Range("A3:A20000").SpecialCells(xlCellTypeVisible).Count

    'Filter W leere Zelle
    Sheets("Tabelle1").ListObjects("Tabelle2").Range.AutoFilter Field:=23, Criteria1:= _
        "="
   
    'Zeilen zählen W leere Zelle
    Sheets("Tabelle2").Range("B9").Value = Sheets("Tabelle1").Range("A3:A20000").SpecialCells(xlCellTypeVisible).Count

    'Filter löschen
    Sheets("Tabelle1").ListObjects("Tabelle2").Range.AutoFilter Field:=23


Was hier genau nicht stimmt weiß ich nicht. Auf jeden Fall ist bei mir die Anzahl der Zeilen insgesamt richtig, aber die Filter zählt er nicht richtig.
Beim filtern nach "beendet" sollten es 268 Werte sein und nicht 8970. Sehr komisch...
Vielleicht liegt es ja an SpecialCells(xlCellTypeVisible).Count? :S

Bitte helft mir! Smile

Danke schonmal!
Gruß
Cass
Castiral
VBA-Halbwissender


Verfasst am:
30. Apr 2014, 12:44
Rufname: Cass
Wohnort: Hamburg

AW: Anzahl der Zeilen mit bestimmten Inhalt - AW: Anzahl der Zeilen mit bestimmten Inhalt

Nach oben
       Version: Office 2010

Oh fast vergessen!
Alternativ geht ja auch, dass die Anzahl der Zeilen ausgegeben wird, in der dieses Wort vorkommt.
Naja ihr schafft das schon, wie immer! Very Happy
Grüßli
joo mei, 's langt


Verfasst am:
30. Apr 2014, 12:47
Rufname:

AW: Anzahl der Zeilen mit bestimmten Inhalt - AW: Anzahl der Zeilen mit bestimmten Inhalt

Nach oben
       Version: Office 2010

Hi,

nimm doch eine Formellösung mit

=zählenwenn(Tabelle1!A1:Axxxx;"beendet")

Grüßli

_________________
eine Weisheit aus der "Funkerei", die ich auch immer anwenden sollte ( frommer Wunsch ):"erst denken, dann drücken, dann sprechen!"
Castiral
VBA-Halbwissender


Verfasst am:
30. Apr 2014, 13:50
Rufname: Cass
Wohnort: Hamburg

AW: Anzahl der Zeilen mit bestimmten Inhalt - AW: Anzahl der Zeilen mit bestimmten Inhalt

Nach oben
       Version: Office 2010

Hallo Grüßli,

die Idee ist gut und ich habe das jetzt für die Bedingungen "beendet" und "nicht begonnen" gemacht.
Danach schreibe ich mit VBA einfach die Werte drüber, super! (Warum bin ich da nicht selber drauf gekommen? Rolling Eyes)

Leider klappt das nicht für die leeren Zellen, weil die Tabelle immer größer wird und ich nicht immer die Formel anpassen will.
Ein Bereich von A3:A20000 hat für die beiden Bedingungen gereicht, mehr Inhalt wird es wohl nie werden...
Aber leider zählt er bei den leeren Zeilen auch die, die garnicht mehr relevant sind.
Momentan sind es insg. 11269 Zeilen, die danach zählt er leider mit.
Bei den leeren Zeilen zählt er also 14399 :/
Vielleicht doch lieber mit xlUp??? Very Happy

Hast du noch eine Idee?

Danke
Cass
Grüßli
joo mei, 's langt


Verfasst am:
30. Apr 2014, 14:16
Rufname:

AW: Anzahl der Zeilen mit bestimmten Inhalt - AW: Anzahl der Zeilen mit bestimmten Inhalt

Nach oben
       Version: Office 2010

Hi,

probiere das mal aus

=ANZAHLLEEREZELLEN(BEREICH.VERSCHIEBEN(A1;0;0; VERWEIS(2;1/(A1:A20000<>"");ZEILE(A1:A20000))))

das kannst du auch auf deine Zählenwenn-Formeln anwenden. Die Formel Bereich.verschieben vergrößert den Zellbereich, die Verweis-Formel liefert dir die ZeilenNr der letzte gefüllten Zelle in Spalte A im Bereich A1:A20000

Grüßli

_________________
eine Weisheit aus der "Funkerei", die ich auch immer anwenden sollte ( frommer Wunsch ):"erst denken, dann drücken, dann sprechen!"
Castiral
VBA-Halbwissender


Verfasst am:
30. Apr 2014, 15:06
Rufname: Cass
Wohnort: Hamburg

AW: Anzahl der Zeilen mit bestimmten Inhalt - AW: Anzahl der Zeilen mit bestimmten Inhalt

Nach oben
       Version: Office 2010

Ich bin in Formeln echt ne Niete.
Aber es funktioniert^^

Für alle, die nicht wissen, wie man daraus Werte macht:
Code:

Range("A3:A" & Range("A" & Rows.Count).End(xlUp).Row) = Range("A3:A" & Range("A" & Rows.Count).End(xlUp).Row).Value


Danke nochmal! Respekt für deine Formelkünste! Very Happy
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Excel Formeln: Stunden und Minuten umwandeln in Anzahl Arbeitstage mit Rest 13 Kim 3911 10. Feb 2005, 18:35
Kim Stunden und Minuten umwandeln in Anzahl Arbeitstage mit Rest
Keine neuen Beiträge Excel Formeln: Zeilen mit doppelten Werten löschen 6 Sebowsky 1208 06. Jan 2005, 22:26
Sebowsky Zeilen mit doppelten Werten löschen
Keine neuen Beiträge Excel Formeln: Anzahl der Tage 18 ExcelAua 2603 27. Dez 2004, 19:28
Excelaua Anzahl der Tage
Keine neuen Beiträge Excel Formeln: HIFE!!! gewisse zeilen löschen 2 Stevie0130 1580 12. Dez 2004, 18:35
Gast HIFE!!! gewisse zeilen löschen
Keine neuen Beiträge Excel Formeln: Bestimmte Zellen mit Inhalt füllen. 4 Axis_Sonnenflieger 3002 07. Dez 2004, 16:19
Axis_Sonnenflieger Bestimmte Zellen mit Inhalt füllen.
Keine neuen Beiträge Excel Formeln: Anzahl identischer Werte 2 Toledo 2627 04. Dez 2004, 01:19
Toledo Anzahl identischer Werte
Keine neuen Beiträge Excel Formeln: sverweis + darunterliegende Zeilen 7 L*R 3701 12. Nov 2004, 13:55
Arnim sverweis + darunterliegende Zeilen
Keine neuen Beiträge Excel Formeln: Verknüpfen von Daten in verschiedenen Zeilen/Spalten 2 Guybrush Treepwood 3197 29. Okt 2004, 09:18
Guybrush Treepwood Verknüpfen von Daten in verschiedenen Zeilen/Spalten
Keine neuen Beiträge Excel Formeln: Zellen vergleichen / Zeilen löschen 3 Satanico 2994 28. Okt 2004, 15:37
icke Zellen vergleichen / Zeilen löschen
Keine neuen Beiträge Excel Formeln: spalte einer bestimmten zelle in einer anderen zelle anzeige 1 brouwe 1290 13. Okt 2004, 18:41
Arnim spalte einer bestimmten zelle in einer anderen zelle anzeige
Keine neuen Beiträge Excel Formeln: Bestimmen einer Zellenposition durch ihren Inhalt 1 FMPO 1607 22. Sep 2004, 13:35
fl618 Bestimmen einer Zellenposition durch ihren Inhalt
Keine neuen Beiträge Excel Formeln: Gruppieren v. bestimmten Spalten/Zellen 1 Gast 4713 21. Sep 2004, 16:41
fl618 Gruppieren v. bestimmten Spalten/Zellen
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Microsoft-Excel Diagramme