Guten Tag
Ich habe eine Excel Tabelle mit einem Makro, das in Spalte 6 die Zeilen mit 0 ausblendet.
Jetzt habe ich versucht, das die Spalten 4 und 5 mit 0 Werten die Zeilen auch ausblendet, aber ich krig das nicht hin.
Es müssten die Spalten 4-6 bei 0 Werten die Zeilen ausblenden.
Ich habe Excel 2003
Hier das Makro, das mit der Spalte 6 funktioniert.
Sub Ausblenden()
Dim intRow As Integer
Application.ScreenUpdating = False
For intRow = 6 To 300
Rows(intRow).EntireRow.Hidden = False
If Cells(intRow, 6).Value = 0 Then _
Rows(intRow).EntireRow.Hidden = True
Next
End Sub
Kann mir jemand helfen
Gruss Gregy