|
Hallo. Ich bin VBA-Anfängerin und scheitere an folgendem:
Ich habe ein Dropdown-Menü in Zelle B3 mit Kiwi, Orange und Banane.
Wenn ich in einem Dropdown-Menü "Kiwi" auswähle, dann sollen die Zeilen 13 bis 15 ausgeblendet werden.
Wenn ich im gleichen Dropdown-Menü "Orange" oder "Banane" auswähle, sollen die Zeilen wieder eingeblendet werden.
Ich komme bis zum Ausblenden, scheitere aber an der Wiedereinblendung. Zusammengebastelt habe ich mir das hier:
Sub zellenausblenden()
Range("B3").Select
ActiveCell.FormulaR1C1 = "Kiwi"
Rows("13:15").Select
Selection.EntireRow.Hidden = True
Range("B3").Select
ActiveCell.FormulaR1C1 = "Orange"
Rows("13:15").Select
Selection.EntireRow.Hidden = False
Range("B3").Select
ActiveCell.FormulaR1C1 = "Banane"
Rows("13:15").Select
Selection.EntireRow.Hidden = False
End Sub
Ich hatte auch noch "If / End if" eingebaut, damit komme ich aber auch nicht zum Ziel.
Ich wäre für Hilfe wirklich dankbar!
LG
|