Schleife + ausblenden

Forumthread: Schleife + ausblenden
3 Beiträge zu diesem Forumthread
Anzeige

Forumthread: Schleife + ausblenden

04.06.2003 23:20:28

Steffen

Guten Abend,

ich habe ein Problem bei dem ich Eure Hilfe brauche.

Und zwar möchte ich allen meinen Aktiven Mappen und den darin enthaltenen Blättern bestimmte Zeilen ausblenden, dies wollte ich mit einer Schleife hinbekommen, aber leider funktioniert diese nicht richtig, sie funktioniert zwar im ersten Blatt aber dann ist Feierabend, vielleicht habt Ihr ne Idee, hier mein Code:

Danke schonmal im voraus.

Steffen

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Re: Schleife + ausblenden

04.06.2003 23:29:47

L.Vira
nochmal hilfe

04.06.2003 23:51:59

Steffen
Re: nochmal hilfe

05.06.2003 01:36:39

L.Vira

Re: Schleife + ausblenden

04.06.2003 23:29:47

L.Vira

If wks.Cells(lgZeile, 79) = "Lex" Then
'Schutz aufheben
schutz_aufheben_only
'ausblenden
wks.Rows(lgZeile).Hidden = True
'Schutz setzen
schutz_setzen_only
End If
lgZeile = lgZeile + 1
Loop Until wks.Cells(lgZeile, 79) = "Ende"

nochmal hilfe

04.06.2003 23:51:59

Steffen

danke für die schnelle antwort,

und das klappt für alle offenen Mappen und den darin enthaltenen Blättern egal wie viele das sind?!

Danke

Steffeb

Re: nochmal hilfe

05.06.2003 01:36:39

L.Vira

Probiers aus, sollte klappen. Den Schutz aufheben und setzen
würde ich aber nur einmal pro Sheet, nicht für jeden treffer.

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!