Zeile ausblenden, wenn in einer Zelle ein bestimmt
03.09.2008 17:24:21
Jakob
Ich habe folgendes Problem:
Ich möchte in den Tabellenblatt "Form3" die zeilen 39-50 ausblenden wenn die Zelle A37 ungleich "Pentax" und "Ciclox" ist. Der Wert der Zelle A37 kommt aus der Eingabe im Tabellenblatt "Eingabemaske" (B7).
Wie müßte der entsprechende VBA-Code aussehen.
Im Netz habe ich bisher folgenden Code gefunden. Dieser bezieht sich aber nicht auf eine einzelne Zelle und beinhaltet nur eine Bedingung.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then
If Cells(Target.Row, 1) = "x" Then
Rows(Target.Row).EntireRow.Hidden = True
End If
End If
End Sub
Vielen Dank im Voraus für Eure Mühe.
Gruß
Jakob