Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.10.2025 09:39:44
VBA - Excel speichern und schließen (Laufzeitfehler 91)
13.10.2025 19:31:31
VBA Formel mit Bezug auf Überschrift anstatt Spalte
13.10.2025 15:10:17
Überlappende Zeiträume über mehrere Tabellen mit leeren Zell
13.10.2025 13:34:56
PQ Abfrage mit verschiedenen Werten ausführen + Protokoll
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
472to476
472to476
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

WICHTIG: Summe farbiger zellen

Forumthread: WICHTIG: Summe farbiger zellen

WICHTIG: Summe farbiger zellen
26.08.2004 14:34:58
Andy
HAllo!
Ich möchte in Cells(x + 3, 9) die Summe der Zellen eintragen lassen, die den Farbcode 35 besitzen. der zu untersuchende Zellbereich íst Range(Cells(9,9),Cells(x-3,9))
Wie kann man das per vba machen?
Ich habe zwar ein paar codes gefunden, kann aber nicht viel damit anfange da ich nicht weiß, was ich wie ändern muss.
DAnke an die Helfer
Andy
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: WICHTIG: Summe farbiger zellen
26.08.2004 14:39:51
Basti
Einfach eine Schleife machen und die Tabelle von links oben nach rechts unten durchlaufen lassen und
aktive Zelle = interior = 35 per if abfrage machen.
Kannst auch geradei Zeilen und Spalten Menge aufschreiben, dann bau ich dir das
AW: WICHTIG: Summe farbiger zellen
Andy
hi basti!
meinst du evtl sowas oder ähnlich? :
summe=0
for each wert in range do
if cells.interior=35 then
summe=summe+cells.value
end do
Zielzelle.value=summe
Andy
Anzeige
AW: WICHTIG: Summe farbiger zellen
nighty
hi andy :)
wie gewuenscht :)
gruss nighty

Sub makro01()
With Worksheets("Tabelle1")
Dim rgBereich As Range
Dim Zelle1 As Range
Dim zaehler1 As Long
Set rgBereich = Worksheets("Tabelle1").Range(Cells(9, 9), Cells(x - 3, 9))
For Each Zelle1 In rgBereich
If Zelle1.Interior.ColorIndex = 35 Then zaehler1 = zaehler1 + Zelle1
Next Zelle1
Cells(x + 3, 9) = zaehler1
End With
End Sub

Anzeige
;

Forumthreads zu verwandten Themen

summe bilden in abhängigkeit von zelleneintrag
zelleneintrag

hallo zusammen
ich hätte gerne gemäss dem beispiel gewusst, wie ich eine summe bilde in abhängigkeit
eines zelleintrages.
gruess
https://www.herber.de/bbs/user/56754.xls
13.11.2008 17:23:00
Thread-ID: 1024309
4 Beiträge
Eintrag wenn Zelle färbig
Josef

Hallo!
Ich habe in der Recherche folgenden VBA Schnipsel gefunden:
If Worksheets("Muster").Range("I" & k).Interior.ColorIndex = 4 Then
Worksheets("Muster").Range("B" & i).FormulaR1C1 = "müssen in Betrieb bleiben"
End If
Abfrage in der gesamten Spalte I, wenn gefunden...
13.04.2011 09:44:48
Thread-ID: 1210145
3 Beiträge
Nur Zellen über Zellen mit best. Wert addieren?
Felix

Ich möchte gerne in dieser Beispieltabelle, in Zelle FR16 die Fairwaylängen (Zeile 14) addieren. Allerdings sollen nur die Zellen addiert werden, unter denen in Zeile 16 ein Wert größer 0 steht. Würde z. B. in Zelle E16 ein Wert 0:00:00 stehen, so sollen die 259 Meter nicht addiert werden.
...
29.02.2012 19:03:07
Thread-ID: 1252975
7 Beiträge
Kann man die Anzahl von farbigen Zellen ermitteln?
farbigen

Hallo Forum,
ist es möglich im Excel die Anzahl der Zellen zu ermitteln, die mit einer Farbe gefüllt worden sind?
Die Zellen enthalten keine weiteren Informationen?
Gruß Thomas
29.05.2012 12:50:18
Thread-ID: 1265248
4 Beiträge
Zellen einfärben wenn andere Zelle farbig
Flo

Hallo zusammen,
ich habe ein Problem, dass ich vermutlich nicht mit der bedingten Formatierung lösen kann. Ich möchte gerne ein Tabellenblatt so gestalten, dass in jeder Zeile die Spalten B bis G grau eingefärbt werden, wenn sie in der Zeile direkt darunter weiß sind.
Mein Code funktio...
30.07.2013 16:34:49
Thread-ID: 1324910
4 Beiträge
Anzeige
Summen von fabrigen Zellen
fabrigen

Hallo an alle,
ich habe mal wieder ein Problem und hoffe auf Hilfe. Ich füge ein Beispiel anbei.
https://www.herber.de/bbs/user/87537.xls
Ich hätte gerne mit einem Makro die Möglichkeit die Summen der farbigen Zellen zu
addieren.
Im Moment habe ich zwar drei Farben, jedoch...
04.10.2013 11:18:14
Thread-ID: 1333161
7 Beiträge
Anzeige
SummeWenn mit Zugriff auf Zelleninhalt
Melki

Hallo ihr Lieben ...
Da ihr mir gestern schon so super helfen konntet, versuche ich es gleich nochmal. Hab leider nichts vergleichbares im Netz gefunden.
Ich habe eine Tabelle im Tabellenblatt "staff", in der in Zelle B12 ein Name steht. Tritt dieser Name in Tabellenblatt "orders" irge...
25.07.2014 09:40:24
Thread-ID: 1372249
3 Beiträge
Wenn Zelle farbig dann Form und Register farbig
Björn
Hallo,
gibt es die Möglichkeit eine bedingt Formatierung auf Formen oder wenn nötig auf Steuerelemente anzuwenden? Ich habe in einem Diagramm mehrere Rechtecke eingefügt, die ich als "Fähnchen" zur freien Verschiebung benötige. Diese sind mit einer Nummer versehen. Jetzt möchte ich, dass sich d...
28.08.2014 15:08:05
Thread-ID: 1378767
6 Beiträge
SUMMEWENN mit Bedingung und Zahl in gleicher Zelle
Christian

Hallo,
ich habe das Problem, daß ich Zahlen addieren möchte nach einer Bedingung, die in der selben Zelle wie die Zahlen stehen. Beispiel 25U oder 3RU oder 13RU.
Ich habe als Notlösung das Tabellenblatt "Kalender" in zwei neue Tabellenblätter "aufgesplittet", das eine zieht nur die Zahl...
16.04.2015 08:55:57
Thread-ID: 1421089
5 Beiträge
Anzeige
Summe von verknüpften Zellen
verknüpften

Hallo,
ich habe in einem Tabellenblatt in den Zellen A5 und K5 jeweils einen verknüpften Wert aus einer anderen Arbeitsmappe. Das wird auch richtig angezeigt.
Wenn ich aber in Zelle C5 die Summe der Zellen A5 und K5 ausrechnen lassen will, erhalte ich entweder nur #Wert oder (falsch) 0,...
19.05.2015 12:45:16
Thread-ID: 1426752
3 Beiträge
VBA - Summe nur von sichtbaren Zellen
sichtbaren

Hallo Forum,
mit folgendem Code errechne ich mir die Summe einer bestimmten Spalte von Werten größer 0:
Range("E1").Value = WorksheetFunction.SumIf(Range(Cells(3, 19), Cells(3, 19).End(xlDown)), ">0")
With Range("E1")
.WrapText = False
.Font.Bold = True
End With
R...
29.05.2015 11:45:22
Thread-ID: 1428320
5 Beiträge
Anzeige
nur Zahlen in den Zellen addieren
rieckmann

Hallo,
ich suche eine Formel die nur Zahlen aus mehrerer Zeilen addiert wo aber auch Text enthalten ist.
Beispiel in Spalte A:
1 Hefter
2 Akten
10 Binder
Nun soll die Anzahl alle Objekte gezählt werden
Ergebnis hier also 13
Wüsste da jemand eine Formel ?
Gruß...
24.08.2015 08:51:46
Thread-ID: 1443968
19 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