ich möchte mit VBA alle Zeilen ausblenden, in denen in der Spalte i ein x eingetragen ist. Wie geht das?
Option Explicit
Sub ZeilenAusblenden()
Dim iCol As Integer
Dim lRow As Long
Dim rWeg As Range
iCol = 9 'Spalte I = Spalte 9
lRow = Cells(Rows.Count, iCol).End(xlUp).Row
For Each rWeg In Range(Cells(1, iCol), Cells(lRow, iCol))
If rWeg.Value = "x" Then rWeg.EntireRow.Hidden = True
Next rWeg
End Sub
Allerdings ist das, aufgrund der Schleife, bei großen Datenbereichen vielleicht nicht praktikabel.