Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
236to240
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
236to240
236to240
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Execl: Formatierungen zählen

Execl: Formatierungen zählen
03.04.2003 13:44:12
Jogibaer
Tach,

hab folgendes Problem: habe Zellen in Excel die mit einer anderen Farbe (z. B. gelb) formatiert sind. Nun möchte ich von Excel zählen lassen wieviele Zellen z. B. gelb formatiert sind

WIE STELLE ICH DAS AN BZW. GEHT DAS ÜBERHAUPT??????

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Execl: Formatierungen zählen
03.04.2003 13:55:57
ChrisL

Hallo Jogibaer

Schau mal hier...
https://www.herber.de/forum/archiv/168to172/t170185.htm
https://www.herber.de/forum/archiv/168to172/t169465.htm

Gruss
Chris

Re: Execl: Formatierungen zählen
03.04.2003 14:07:26
geri

die Formel
=Farbsumme(A1:A70;4) die 4 steht für die Farbe 4=grün
in Modul
Option Explicit
Function Farbsumme(Bereich As Range, Farbe As Integer)
Application.Volatile ' damit bei änderung ausgeführt wird
Dim Zelle
Farbsumme = 0
For Each Zelle In Bereich
If Zelle.Interior.ColorIndex = Farbe Then
Farbsumme = Farbsumme + 1
End If
Next
End Function
Sub Farbnummer()
Dim i As Integer
i = ActiveCell.Interior.ColorIndex
MsgBox " Farbnummer " & i
End Sub
versuche es so (glaube ist von HajoZi)

gruss geri

Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige