Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Spalten mit farbigen Zellen ausblenden

Spalten mit farbigen Zellen ausblenden
11.06.2009 19:25:52
Robert
Hallo,
stehe momentan voll auf dem Schlauch und komm nicht weiter.
Könnte Ihr mir bitte helfen?
Ich müsste alle Spalten, in denen eine oder mehrere farbige Zellen sind, ausblenden.
- und das wenn möglich mit VBA.
Vielen Dank schon mal.
Gruß Robert
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Spalten mit farbigen Zellen ausblenden
11.06.2009 19:47:41
Daniel
Hi
ist eigentlich nicht schwierig:

Sub Farbausblenden()
Dim ze As Long
Dim sp As Long
With ActiveSheet.UsedRange
.EntireRow.Hidden = False
For ze = 1 To .Rows.Count
For sp = 1 To .Columns.Count
If .Cells(ze, sp).Interior.ColorIndex  -4142 Then
Rows(ze).Hidden = True
Exit For
End If
Next
Next
End With
End Sub


Gruß, Daniel

Anzeige
AW: Spalten mit farbigen Zellen ausblenden
11.06.2009 19:59:09
Robert
Hallo Daniel,
danke für Deine Hilfe.
Genau das wars.
Gruß Robert
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige