Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
736to740
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
736to740
736to740
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Tabellenblätter suchen

Tabellenblätter suchen
23.02.2006 11:49:40
Karschti
Hallo an die Fachwelt,
ich habe gaaannnz viele Tabellenblätter. Auf jedem Tabellenblatt ergibt die gesamte Spalte Z die Summe 26.
Wenn nun die Summe größer als 26,00 ist, dann sollten die Tabellen farblich makiert werden. Vielleicht in einem freundlichen rot?
Ich verzweifel gleich! Könnt Ihr helfen?
Gruß Karschti

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

Betreff
Datum
Anwender
Anzeige
AW: Tabellenblätter suchen
23.02.2006 11:57:09
u_
Hallo,

Sub Makro1()
Dim wks As Worksheet
For Each wks In Worksheets
If Application.WorksheetFunction.Sum(wks.Columns(26)) > 26 Then
wks.Tab.ColorIndex = 3
End If
Next
End Sub

Gruß
Geist ist geil!
AW: Tabellenblätter suchen
23.02.2006 12:11:55
Karschti
Danke - ein Prost auf Dich!
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige