Tipps & Tricks 29.02.2004, 23:15 Uhr

Summe der rot markierten Zellinhalte

Betriebssysteme: egal involvierte Software: Excel 2000 Hardware: Problembeschreibung: Ist es möglich in einer Excel-Tabelle nur die rot (Zellenfarbe) markierten Zellen zusammenzuzählen! Nicht die Anzahl Zellen sondern die Summe!
Verwenden Sie dafür das folgende Makro, dass sie in ein Modul der entsprechenden Arbeitsmappe einfügen können
Passen Sie den Bereich im entsprechenden Teil des Makros an. Wenn das Makro ausgeführt wird, erhalten Sie folgendes Ergebnis:
Sie können dem Makro eine Tastenkombination zuweisen oder es an eine Schaltfläche binden, um es möglichst schnell ausführen zu können. Oder Sie rufen es einfach mit der Tastenkombination ALT+F8 auf.
-------------------------------------
MAKRO ZUM KOPIEREN:
-------------------------------------
Sub SummeRoterZellen()
Dim Zelle As Object
Dim rot#, nrot#
'Bereich hier eintragen
[A1:C20].Select
rot = 0: fett = 0
For Each Zelle In Selection
If Zelle.Interior.ColorIndex = 3 Then nrot = Zelle.Value
rot = rot + nrot
nrot = 0
Next
[A1].Select
ActiveCell.Value = rot
End Sub
-------------------------------------


Kommentare

Es sind keine Kommentare vorhanden.