ich habe eine Excel Tabelle, in welcher einzelne Zeilen ausgeblendet werden sollen. In den Zeilen, welche ausgeblendet werden sollen, muss in Spalte "K" ein kleines "x" eingetragen sein. Ich habe es mit nachfolgendem Makro versucht, wusste aber nicht, wie ich den relevanten Bereich auf Spalte "K" beschränke. Bei Anwendung des Makros werden alle Zeilen ausgeblendet.
Die Zeilen müssen hinterher auch wieder eingeblendet werden können (dies funktioniert bereits).
Vielen Dank im Voraus.
Elmar
Sub ehemalige_ausblenden()
' ehemalige_ausblenden Makro
' ehemalige Bewohner ausblenden
' Tastenkombination: Strg+a
Dim Zelle As Range
For Each Zelle In ActiveSheet.UsedRange
If Zelle.Value = x And Rows(Zelle.Row).Hidden = False _
Then Rows(Zelle.Row).Hidden = True
Next Zelle
End Sub
Sub ehemalige_einblenden()
'
' ehemalige_einblenden Makro
' ehemalige Bewohner einblenden
'
' Tastenkombination: Strg+e
'
Cells.Rows.Hidden = False
End Sub