Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
25.09.2025 16:01:26
VBA - Laufzeitfehler 9105 zu viele Zeichen 255
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
736to740
736to740
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Anzahl der eingrfärbten Felder ermitteln

Forumthread: Anzahl der eingrfärbten Felder ermitteln

Anzahl der eingrfärbten Felder ermitteln
23.02.2006 00:34:48
Patrick
Hi, hoffe Ihr könnt mir helfen.
Ich habe einen Bereich (F2:F20), in dem die Felder entweder blau (Interior.ColorIndex = 37) oder rot (Interior.ColorIndex = 3) eingefärbt werden (und zwar automatisch).
Ich möchte nun, dass automatisch, also bei jeder Änderung im Sheet geprüft wird, ob aktuell 11 blaue Felder in diesem Bereich vorhanden sind. Ansonsten soll etwas passieren, z.B. in dem Feld H7 könnte "ACHTUNG" stehen oder so...
Viel Spass beim knobeln...
Patrick
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Anzahl der eingrfärbten Felder ermitteln
23.02.2006 04:37:12
Mustafa
Hallo Patrick,
Schau mal hier nach.
http://home.media-n.de/ziplies/
Viel zeug zum Probieren da.
Hoffe es hilft dir weiter.
Viele Grüße aus dem Jecken Kölle
AW: Anzahl der eingrfärbten Felder ermitteln
23.02.2006 10:06:27
WernerB.
Hallo Patrick,
das nachstehende Makro gehört in das Modul des entsprechenden Tabellenblattes (es funktioniert leider nicht, wenn die Hintergrundfarben durch bedingte Formatierung erzeugt werden!):

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim c As Range, _
z As Byte
For Each c In Range("F2:F20")
If c.Interior.ColorIndex = 37 Then
z = z + 1
End If
Next c
If z = 11 Then
Range("H7").ClearContents
Else
Range("H7").Value = "ACHTUNG"
End If
End Sub

Viel Erfolg wünscht
WernerB.
P.S.: Dieses Forum lebt auch von den Rückmeldungen der Fragesteller an die Antworter !
Anzeige
AW: Anzahl der eingrfärbten Felder ermitteln
26.02.2006 16:13:26
Patrick
FUNZT !!!
1000 Dank, Werner!!!!
;

Forumthreads zu verwandten Themen

Zahlencode mit Punkte Formatieren
runny

Wer kann mir weiter helfen.
Ich habe einen 10-stelligen Zahlencode 0265006214 und diesen soll Excel autom. in das Format 0265.006.214 bringen.
Also nach der 4.Stelle und der 7.Stelle einen Punkt (SAP-Format). Zelle formatieren und ####.###.### habe ich schon ohne Erfolg geprüft.
Er...
28.08.2008 00:14:00
Thread-ID: 1005247
3 Beiträge
Aufsteigend Zählen in der Mitte einer Nummer
Thorsten

Hallo Zusammen,
habe folgendes Problem. Bei Nummer 123-321-0001-0815-4711 soll an der Position 0001 aufsteigend gezählt werden, wenn sie nach unten kopiert bzw. gezogen wird. Die lezte Position 4711 soll dabei aber nicht verändert werden.
Bsp.
123-321-0001-0815-4711
123-321-000...
20.02.2009 09:20:00
Thread-ID: 1052337
4 Beiträge
Diagramm mit zwei Datenpunkten je x-Achsenpunkt
Broadcast

Hallo,
ich habe folgendes Problem. Ich versuche ein Diagramm zu erstellen, bei dem eine Darstellung wie die Folgende das Ergebnis sein soll:
http://ews.tu-dortmund.de:8080/public/lecture/logedugate/public/PWL/pw_eoq/bilder/pw_eoqbed.gif
Das Problem ist, dass Excel bei mir einfach ke...
26.08.2009 13:10:53
Thread-ID: 1098739
3 Beiträge
Anzahl von Werten mit mehreren Unterpunkten
Werten

Hallo zusammen,
habe folgendes Problem: Ich habe eine Liste mit Bestellungen.
Diese Bestellungen haben teilweise nur eine Position, teils mehrere.
Ich möchte nun nur wissen, wieviele Bestellungen ich ingesamt habe, egal wieviele Positionen die einzelne Bestellung hat....
Bsp:
14.10.2009 10:42:41
Thread-ID: 1109527
4 Beiträge
Punktdiagramm Datenreihe mit VBA entfernen
Ganna

Hallo,
Ich habe jetzt ein Punktdiagramm erstellt. Ich habe insgesamt 2 Datenreihen. Wie kann ich aus der folgenden Code 1.Datenreihe entfernen?
Sheets("Wertetabelle").Activate
ActiveSheet.UsedRange.ClearContents
Range("a1") = "Konzentrations- und Frachtentwicklung im Prognosezei...
19.11.2009 12:54:32
Thread-ID: 1118586
2 Beiträge
Diagramm Datenpunktbeschriftung mit vba drehen
Martin

Liebe Profis, brauche Hilfe, komme nicht mehr allein weiter:
ich versuche schon das ganze WE (vergeblich) das folgende Problem zu lösen, im Netz hab ich auch nichts gefunden:
Habe ein Diagramm (XY-Punkt) erstellt. Darin gibt es eine Datenreihe (lineare Fkt). Den letzten Datenpunkt darau...
07.03.2010 17:00:40
Thread-ID: 1144156
4 Beiträge
Anzeige
Diagramm mit Punkten und Linien
Wolfango

Hallo Experten,
in einem Diagramm werden Wertekoordinaten als Punkte dargestellt (genaugenommen sind es immer je zwei Wertepaare, da Veränderungen ggü. dem Vormonat sichtbar werden sollen)
Siehe: https://www.herber.de/bbs/user/68893.xls
Dort wo die große schwarze Raute ist soll si...
31.03.2010 11:10:10
Thread-ID: 1149552
9 Beiträge
Anzeige
Workbooks.Open Dateiname mit Punkt bringt Fehler
Harald

Hallo im Forum
ich verwende dieses Makro in Excel XP, jetzt habe ich Excel 2007 und es geht nicht mehr, wie ich feststellen konnte liegt es am Dateinamen der mehrer Punkte enthalten kann löscht man die Punktzeichen öffnet das Makro die Datei.
Workbooks.Open "C:\Datei 21.02.xls" so b...
09.04.2010 19:44:58
Thread-ID: 1150838
3 Beiträge
Zahl mit Punkt von Text trennen
Text

Hallo zusammen
Mit folgendem Code trenne ich die reine Zahl vom Text, wobei der Punkt verloren geht. Wie kann ich die vollständige Zahl mit Punkt trennen (Ergebnis sollte 150.2 sein)? Sub test() Linie = "150.2 (Aaaa - Bbbbb)" For Start = 1 To Len(Linie) sZeichen = Mid(Linie, Start, 1) If Is...
24.06.2010 13:11:36
Thread-ID: 1163876
3 Beiträge
Anzeige
Zahlen mit Punkt erkennen
Gregor

Hallo zusammen
Ich werde im Forum nicht fündig, obwohl bestimmt vorhanden. Ich will per VBA Zeilen mit Zahlen übertragen, wobei nur Zahlen (PSP) ohne Punkt übertragen werden sollen. Wie kann ich Zahlen mit Punkt erkennen, zB 1234.4, damit diese übersprungen werden?
Set SuBe = Workbooks(...
08.07.2010 12:51:51
Thread-ID: 1166126
6 Beiträge
Mittelwert der Minima eines Periodische Signals
jerry

Hallo Leute,
ich habe aus mehreren Messreihen eines periodischen Signals, die Daten in Excel vorliegen. In der ersten Spalte die Zeit in der zweiten den Meßwert. Jetzt muß ich den Mittelwert der Minima bzw. Maxima der Perioden bestimmen. geht das irgendwie mit einer matrixformel o.ä.
Die...
06.05.2002 15:09:21
Thread-ID: 118845
2 Beiträge
Anzeige
mehrere voneinander abhängige Zellbezüge ermitteln
Fritz_W

Hallo Forumsbesucher,
bitte um Hilfe bei nachfolgendem Vorhaben:
Im Zellbereich C11:C40 befinden sich Zahlenwerte.
Mit welcher Formel lässt sich in D1 die größte Zahl aus diesem Zellbereich ermitteln, wobei bei mehreren gleich großen Werten ich die erste Zelle des Zellbereichs ermi...
19.11.2010 08:45:04
Thread-ID: 1187691
5 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