ich würde mich freuen, wenn ihr mir bei folgendem Problem helfen könntet:
Ich habe ein Tabellenblatt. In diesem Tabellenblatt kann man unter der Zelle AW9 eine Zahl zwischen 1 und 3 auswählen. Je nach dem welche Zahl ich auswähle, erscheint in der Spalte O in den jeweiligen Zeilen das Wort "ausblenden".
Beispiel: Wenn ich die Zahl 1 auswähle, dann erscheint in den Zeilen 15 bis 17 in der Spalte O das Wort "ausblenden", wenn ich die Zahl 2 auswähle, dann erscheint in den Zeilen 22 bis 27 in der Spalte O das Wort "ausblenden".
Das Makro soll jetzt letztendlich jede Zeile, in der Spalte O, in der das Wort "ausblenden" steht, ausblenden.
Das habe ich auch - nach langen recherchieren und ausprobieren - mit folgendem makro hinbekommen:
Sub ausblenden()
Application.ScreenUpdating = False
For i = 1 To Cells(Rows.Count, 15).End(xlUp).Row
If Cells(i, 15).Value = "ausblenden" Then
Rows(i).EntireRow.Hidden = True
End If
Next i
Application.ScreenUpdating = True
Range("j8").Select
End Sub
Wenn ich die Zahl 1 auswähle, und das makro ausführe, dann blendet mir excel die Zeilen 15 bis 17 in der Spalte O auch richtig aus. Mein Problem besteht jetzt darin, dass wenn ich danach die Zahl 2 auswähle und das makro ausführe, ich erst per Hand alle Zeilen einblenden muss, damit mir excel dann die richtigen Zeilen wieder ausblendet.
Anbei habe ich meine Testdatei mal angefügt.
Ich hoffe ihr versteht mein Problem und könnt mir weiterhelfen!
Viele Grüße
Niklas
https://www.herber.de/bbs/user/115780.xlsm