Hallo ihr vba helden,
bräuchte mal wieder eure hilfe, is bestimmt ganz einfach aber ich raf das irgendwie nich komm mit den schleifen noch nich klar.
kann mir jemand diesen code etwas vereinfachen, ist immer der selbe zeilenabstand.
If Range("I54").Value = 0 Then
Rows("1:58").EntireRow.Hidden = True
End If
If Range("I112").Value = 0 Then
Rows("59:116").EntireRow.Hidden = True
End If
If Range("I170").Value = 0 Then
Rows("117:174").EntireRow.Hidden = True
End If
If Range("I228").Value = 0 Then
Rows("175:232").EntireRow.Hidden = True
End If
vieleicht komm ich ja dann dahinter wie das geht. sorry das ich keine bsp datei mitschicke.
vielen dank im voraus