VBA problem

Forumthread: VBA problem
2 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: VBA problem

VBA problem

06.02.2006 11:28:12

Seppl

Hallo
Ich möchte nach eingabe eines von 8 besimmten Namen, daß sich die Zellenhintergrund in eine bestimmte Farbe wechselt und daß, dann zB 12 nachfolgenden Zellen in der gleichen Zeile eine bestimmte Schriftfabe erhalten.
Zudem sollen dann alle Zellen mit der gleichen Schriftfarbe addiert werden.
kleines muster https://www.herber.de/bbs/user/30707.xls
Hoffe mir kann da jemand helfen
Danke

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: VBA problem

06.02.2006 13:47:31

Harald
AW: VBA problem

06.02.2006 16:45:57

Seppl

AW: VBA problem

06.02.2006 13:47:31

Harald

Hallo Sepp,
Codes sind im Blattmodul. Vielleicht hilfts ja ;-))
https://www.herber.de/bbs/user/30712.xls
Gruss Harald

AW: VBA problem

06.02.2006 16:45:57

Seppl

Hallo Harald
der erste eindruck ist supi
kann es aber erst heut bzw. morgen abend testen.
die zelle der mit zB.Roter Schrift sollte in einer anderen Zelle zB. C16 stattfinden mit folgender Formel z.B.
C16=Farbsumme(B2:B9;3) und folgendem Skript


Function Farbsumme(Bereich As Range, Farbzelle As Object)
Dim Zelle As Object
Application.Volatile
For Each Zelle In Bereich
If Zelle.Font.ColorIndex = Farbzelle.Font.ColorIndex Then
Farbsumme = Farbsumme + Zelle
End If
Next
End Function

Kann das mit der Beispieldatei https://www.herber.de/bbs/user/30720.xls
überhaupt funktionieren?
Wenn nicht wär ich für eine Bespielskript dankbar
Gruß und Danke
Seppl