|
Hallo,
ich habe eine sehr große Excel Tabelle bei der ich gerne Spalten ausblenden möchte, wenn ein bestimmter Wert innerhalb einer Spalte/Zelle ist.
Wenn wir z.B. davon ausgehen, dass ich nach einer „0“ in einer Spalte suche, muss aber gewährleistet sein, dass sich die Spalte nicht versteckt, wenn in einer anderen Zeile der Spalte sich eine „1“ befindet.
Folgenden Code habe ich im Internet dazu finden können:
Sub BestimmteZeilenAusblenden()
Dim Zelle As Range
For Each Zelle In ActiveSheet.UsedRange
If Zelle.Value = 0 And Columns(Zelle.Column).Hidden = False _
Then Columns(Zelle.Column).Hidden = True
Next Zelle
End Sub
Was mir hier fehlt, ist
1. Eine Möglichkeit nur einen bestimmten Block der Tabelle zu prüfen
2. Eine Überprüfung, dass die Spalte sich nur ausblendet, wenn die „0“ alleine vorkommt.
Hoffe ich habe es verständlich beschrieben.
mfg
jin
|