Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
24.04.2024 17:19:09
Formel mit Index-Funktion
24.04.2024 16:19:42
SummeWenn / SummeWenns mit Bedingung wenn kleiner als dann
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
328to332
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
328to332
328to332
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Rechnen in Abhängigkeit von Formatierungen

Rechnen in Abhängigkeit von Formatierungen
31.10.2003 11:38:32
Tim
folgende frage:

kann man aus einer zahlenliste, in der die zellen farbig markiert sind, eine summe aus z.B den rot markierten zellen bilden? die rechnung müsste also abhängig von der jeweiligen Fornatierung sein.

Vielen Dank für Eure Hilfe.
Tim
++

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

Betreff
Datum
Anwender
Anzeige
AW: Rechnen in Abhängigkeit von Formatierungen
31.10.2003 11:39:46
Dirk
Hallo.

Meines Wissens, funktioniert das ohne VBA nicht.

Cheers
AW: Rechnen in Abhängigkeit von Formatierungen
31.10.2003 11:42:21
Carsten v.H.
Hallo Tim,

ohne VBA geht es nicht.

Gruß Carsten
Summe aus farbigen Zellen - ohne VBA
31.10.2003 11:54:15
Boris
Hi Carsten, hi Tim,

das geht auch mit Bordmitteln:

https://www.herber.de/forum/messages/329493.html

Wenn dann in Spalte A die Zahlen stehen, in Spalte B die Formel (=FARBE) aus dem Beitrag, dann kann man z.B. die Summe aller roten Zellen bilden mit:

=SUMMEWENN(B:B;3;A:A)

Grüße Boris
AW: Rechnen in Abhängigkeit von Formatierungen
31.10.2003 11:48:05
OttoH
Halli Tim,

mit VBA geht's z.B. so:


Sub summerot()
Dim Zelle As Range
Dim Summe As Long
Summe = 0
For Each Zelle In ActiveSheet.Range("A1:A10")
If Zelle.Interior.ColorIndex = 3 Then
Summe = Summe + Zelle.Value
End If
Next
Range("B15").Value = Summe
End Sub


Zahlen in A1 bis A10; summe in B15.

Gruß OttoH
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige