Zeile mit bestimmten Kriterium ausblenden



Excel-Version: 10.0 (Office XP)
nach unten

Betrifft: Zeile mit bestimmten Kriterium ausblenden
von: BeZu
Geschrieben am: 07.06.2002 - 14:22:40

Hi Excel-Fans,
ich wäre für eine kurzfristige Antwort sehr dankbar, da ich gerade im Office an einem Excel-Problem sitze:

Ich habe eine Tabelle namens "05.06.02", in der in der Spalte N je Zeile eines der Kriterien E, W, C, S, U, M, X, V steht.

Alle Zeilen, die S, U, M, X, V enthalten, sollen ausgeblendet werden. Nachfolgender Versuch meinerseits funktioniert nicht. Bin VBA-Anfänger.

Private Sub Nicht_relevante_Projekte_ausblenden()
Worksheets("05.06.02").Activate
Rows(13).Select
If Cells("S,U,M,X,V") Then
Selection.EntireRow.Hidden = True
End If
End Sub

Fehlermeldung: Laufzeitfehler 13; Fehler liegt gemäß Debuggen in If-Zeile: "Typen unverträglich".

Danke f.d. Hilfe.

Bernd :-(




nach oben   nach unten

Re: Zeile mit bestimmten Kriterium ausblenden
von: MikeS
Geschrieben am: 07.06.2002 - 14:48:31

Hallo Bernd,

probier mal das...

Klappt`s so?

Ciao Mike

nach oben   nach unten

alle Zeilen einblenden
von: MikeS
Geschrieben am: 07.06.2002 - 15:12:43

Hallo Bernd,

zum einblenden aller Zeilen nimm:

Ciao MikeS

nach oben   nach unten

Re: Zeile mit bestimmten Kriterium ausblenden
von: Bernd
Geschrieben am: 07.06.2002 - 15:40:33

Hallo Mike,
dein Makro funktioniert einwandfrei. Super. Danke!!!

Bernd


nach oben   nach unten

Re: alle Zeilen einblenden
von: Bernd
Geschrieben am: 07.06.2002 - 15:48:07

Mike,
kannst du Gedanken lesen?
Genau an diesem Problem knabbere ich gerade. Ich geh jetzt in ein Meeting bis 5 Uhr, danach baue ich es ein und gebe dir feedback.
Du bist echt super!

Ciao
Bernd


nach oben   nach unten

Re: alle Zeilen einblenden
von: Bernd
Geschrieben am: 07.06.2002 - 17:42:10

Mike,
einblenden klappte natürlich auch problemlos.

Schönes Wochenende! Ich werde weiter am VBA-Buch lesen und üben.

Grüße

Bernd


 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Zeile mit bestimmten Kriterium ausblenden"