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

zählen:rote,nicht gefilterte

Forumthread: zählen:rote,nicht gefilterte

zählen:rote,nicht gefilterte
08.12.2003 15:33:37
Peter
wie kann ich per vba zählen: alle roten _und_ nicht gefilterten zellen?

oder noch besser: inputbox für farbe -> inputbox(en) für einschlüsse oder ausschlüsse -> zählen

thx4hlp
peter
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: zählen:rote,nicht gefilterte
08.12.2003 17:30:03
Martin Beck
Hallo Peter,

versuch's mal so:


Sub rot_ungefiltert()
anz = 0
For Each cell In ActiveSheet.UsedRange
If cell.Interior.ColorIndex = 3 And Rows(cell.Row).Hidden = False Then
anz = anz + 1
End If
Next
MsgBox anz
End Sub


Gruß
Martin Beck
Anzeige
AW: zählen:rote,nicht gefilterte
09.12.2003 10:05:25
Peter
so hab ichs übernommen:


Sub rot_ungefiltert()
Dim anz As Integer
Dim cell As Range
anz = 0
For Each cell In ActiveSheet.UsedRange
If cell.Font.ColorIndex = 3 And Rows(cell.Row).Hidden = False Then
anz = anz + 1
End If
Next
MsgBox anz
End Sub


danke - funktioniert(fast) .. zählt allerdings eins zuviel ... mal schauen warum ...

gruß
peter
Anzeige
AW: zählen:rote,nicht gefilterte
09.12.2003 13:42:00
Martin Beck
Hallo Peter,

nur eine Vermutung. Ist die erste Zeile, die die Saltenüberschrift enthält (=Zellen mit dem "Pfeil" des Autofilters) auch rot hervorgehoben? Diese Zellen würden mitgezählt.

Gruß
Martin Beck
;

Forumthreads zu verwandten Themen

Gefilterte Dateien in txt exportieren
Gerhard

Namd zusammen
Gibt es eine Möglichkeit ausschliesslich gefilterte Dateien in eine txt Datei zu speichern?
Habe eine grosse Tabelle aus der ich nur einzelne Spalten (andere Spalten sind via VBA ausgeblendet) benötige und aus diesen noch sichtbaren Spalten via Autofilter nochmals eingren...
18.08.2008 21:35:19
Thread-ID: 1002746
4 Beiträge
Filtern, gefilterte Daten benutzen, Suchen und Aus
Merle


Hallo alle zusammen,
ich habe ein mittelschweres Problem. Und zwar habe ich hier ein Beispiel:
https://www.herber.de/bbs/user/55986.xls
In 'Tabelle1' sind ganz viele verschiedene Waren (C17:57) hinterlegt. Ich möchte nun, wenn ich eine dieser Waren rausfilter z.B H025, dass da...
13.10.2008 15:48:00
Thread-ID: 1016087
3 Beiträge
Nur gefilterte Zeilen in ein Textfeld übergeben
Heiko

Hallo an alle,
ich brauche ein wenig Hilfe. Ich bin gerade dabei aus einem ziemlich breiten (unübersichtlich geworden) Sheet die gewünschten Werte in eine Form (Textfeld) zu übergeben.
Ich bekomme es leider nicht hin, dass nur die gefilterten Zeilen im Textfeld erscheinen sollen.
Ic...
05.11.2008 19:59:37
Thread-ID: 1022076
7 Beiträge
Gefilterte Zeilen/ Spalten Kopieren
Falk

Hallo zusammen,
folgendes Problem für mich:
Ich filtere den Bereich von A1:CD1000. Der Filter wird je nach Anforderung auf verschiedene Spalten gesetzt.
In den Zellen von Spalte A befindet sich eine Formel, die den Blattnamen anzeigt wenn in Spalte D und F etwas eingetragen ist anso...
11.11.2008 10:13:33
Thread-ID: 1023442
3 Beiträge
Formel - Anzeige der gefilterten Inhalte
Rocky

Hallo Excelfreunde und zweiäugigen unter den Blinden und Einäugigen,
ich möchte gern einen dynamischen "Querfilter" basteln. Mein Ansatz bisher: Ich kopieren die Tabelle und transportiere diese. dann wird in jede Zelle folgende Formel geschrieben:
=WENN(INDIREKT(ADRESSE(SPALTE()+0;ZEILE...
28.11.2008 08:53:12
Thread-ID: 1028554
4 Beiträge
Anzeige
gefilterte Daten in Listbox einfügen
Larissa

Hallo,
ich möchte nur gefilterte daten in eine Listbox einlesen. Dieses Makro habe ich hier gefunden:
ClassModule: Artikel
Private Sub Worksheet_Calculate()
Dim iCounter As Integer
lstFilter.Clear
For iCounter = 2 To WorksheetFunction.CountA(Columns(1))
If Rows(iCoun...
17.01.2009 17:30:00
Thread-ID: 1040940
2 Beiträge
Anzeige
gefilterte Daten in Listbox einfügen
Larissa

Hallo,
ich bin mir nicht sicher, ob es richtig ist, dass ich einen neuen Thread aufmache, weil ich diese Frage schon für ein anderes Makro gestellt habe.
Jetzt komme ich an einer anderen Stelle nicht weiter. Auch mit dem folgenden Mako lese ich Daten aus einer Tabelle "Artikel" in eine...
18.01.2009 00:30:47
Thread-ID: 1041031
6 Beiträge
gefilterte Daten aus Listbox einlesen
Larissa

Hallo,
jetzt stecke ich wieder fest in meinem Userform.
Dank Eurer Hilfe habe ich jetzt geschafft, in der Listbox gefilterte Daten anzuzeigen.
Wenn man jetzt auf eine Eintragung in der Listbox klickt, sollen die Daten in Textfelder eingetragen werden.
Wenn die Daten nicht gefilt...
18.01.2009 19:19:00
Thread-ID: 1041237
11 Beiträge
ZÄHLENWENN mit gefilterten Daten
Wolfango

Hallo Experten,
folgendes:
In einer Spalte stehen Datumswerte. Diese Datumswerte werden mit folgender Formel ausgewertet:
ZÄHLENWENN(H9:H233;"<"&HEUTE()-29)
Das führt auch wunderbar zum gewünschten Resultat.
Ich möchte nun in der gleichen Spalte über den Autofilter...
30.01.2009 13:04:18
Thread-ID: 1045371
2 Beiträge
Selektieren gefilterter Datensätze, wie?
Werner

mein VBA-Level: befriedigend
Hallo Freunde,
wenn ich mit dem Auto-Filter, z.B. manuell, aus einer Menge von Datensätzen einen Teil herausgefiltert
habe und dann einen Teil der nach dem Filtern verbliebenen Zeilen markiere und kopieren will,
kopiert Excel offenbar immer die durch...
01.02.2009 09:32:39
Thread-ID: 1045837
5 Beiträge
Daten in gefilterten Bereich Kopieren
Sebastian

Hallo Forum,
vielleicht kann mir jemand bei meinem Problem helfen. Google konnte es nicht. :(
Ich habe ein Tabellenblatt mit gefilterten Daten. Nun möchte ich von einem anderen Tabellenblatt Daten neben die gefilterten, noch sichtbaren Daten kopieren. Excel lässt das leider nicht zu.
03.02.2009 15:19:09
Thread-ID: 1046691
2 Beiträge
ZÄHLENWENN mit gefilterten Daten?
Thomas

Hallo,
ich habe ein Problem. Ich habe ein Datenblatt mit 7 Spalten an Daten und um Häufigkeiten einzelner Daten in bestimmten Zeiträumen auszurechnen brauche ich die "ZÄHLENWENN" Funktion. Leider rechnet die mit allen Tabellendaten und nicht wie ich gehofft habe, nur mit den gefilterten Dat...
26.02.2009 15:47:33
Thread-ID: 1054438
6 Beiträge

Beliebteste Forumthreads (12 Monate)

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