schleife mit ausblenden geht nicht
07.08.2003 16:09:45
Steffen
ich habe folgenden Code
Dim lgZeile As Long
lgZeile = 4
Do
If Cells(lgZeile, 12) = 1 Then Rows(lgZeile).EntireRow.Hidden = False
If Cells(lgZeile, 12) = 2 Then Rows(lgZeile).EntireRow.Hidden = True
lgZeile = lgZeile + 1
Loop Until lgZeile = 1002 Or Cells(lgZeile, 12) = "Ende"
Aber leider passiert bei diesem überhaupt nichts.
Was mache ich bloß falsch, ich möchte doch nur dass wenn in Spalte 12 eine 1 drinsteht die Zeilen eingeblendet, bei einer 2 die Zeilen ausblendet werden.
Vielleicht habt Ihr eine Idee, danke schonmal
Steffen