Zeilen ausblenden
03.09.2007 13:06:00
Bernd
Liebe Excel-Gemeinde,
ich schäm mich schon, aber ich kriege es einfach nicht mit VBA ( VBA ist mir wichtig) hin, alle Zeilen mit dem Text "nicht vorhanden" in der Spalte J auszublenden. Ich habe im Archiv gesucht, aber ich schaffe es nicht, die Beispiele umzusetzen. Es tut sich ncichts...
Sub NurNichtVorhandenAnzeigen()
Dim Bereich As Range
Dim Auswahl As Variant
Set Bereich = Range("j6:j2500")
Selection = ("nicht vorhanden")
If Selection = True Then
Selection.EntireRow.Hidden = False
End If
End Sub
Grüße
Bernd