Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

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

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

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
Anzeige

315 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige