ich schildere jetzt mal mein Problem.
Ich will ein Makro schreiben, dass Zeilen ausblendet, wenn in der 3. Spalte #NV steht.
Kann mir da jemand helfen.
Beste Grüsse Max
Private Sub Worksheet_Activate()
Dim i As Integer
For i = 5 To 32
If Cells(i, 3).Value > "0" Then
Rows(i).EntireColumn.Hidden = False
Else
Rows(i).EntireColumn.Hidden = True
End If
Next
End Sub
Jedoch gibt er mir einen Fehler aus. Die Zeile mit Cells wird dann gelb markiert.
Sub Ausblenden()
Columns("C:C").SpecialCells(xlCellTypeFormulas, 16).EntireRow.Hidden = True
End Sub
Sub tt()
Dim rng As Range
For Each rng In Range("A1").CurrentRegion.Rows
rng.Hidden = IsError(rng.Cells(1, 3))
Next
End Sub