prüfen und verstecken.
04.10.2005 10:47:30
Daniel
Ich habe schon in der Recherche geschaut, aber nicht wirklich as hilfreiches gefunde. Ich abe diesen Code hier. Er soll die Spalten Tabellenblatt "Daten" ausblenden die NICHT in in Spalte A, TRS0001I stehen haben. Wie muss ich meinen Code ändern das es funktioniert?
Sheets("Daten").Select
Anzahl = Sheets("Daten").Cells(Rows.Count, 1).End(xlUp).Row
Dim v As Long
For v = 5 To Anzahl
If Cells(v, "A").Value "TRS0001I" Then
Rows(v).EntireRow.Hidden = True
End If
Next v
Vielen dank für eure Mühe