Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1060to1064
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Zeilen Ein und Ausblenden

Zeilen Ein und Ausblenden
23.03.2009 16:43:10
TinoB
Hallo Excelgemeinde,
ich stehe gerade auf dem Schlauch und hoffe Ihr könnt mir helfen. Ich habe im Forum schon danach gesucht, nur leider komme ich nicht weiter. Ich möchte wenn in der Zelle B2 eine 1, 2 oder 3 steht die Zeile 18 ausblenden. Ansonsten soll diese eingeblendet werden oder zumindest bei Eingabe der Zahl 4 oder 5. Hier mein bisheriger Code nur wird mir da die Zeile nicht mehr eingeblendet. Was ist hier Falsch?

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Cells(2, 2).Text = "1" Or "2" Or "3" Then
Rows(18).EntireRow.Hidden = True
Else
Rows(18).EntireRow.Hidden = False
End If
End Sub


Danke
Tino

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeilen Ein und Ausblenden
23.03.2009 16:49:19
Oberschlumpf
Hi Tino
Ändere die entsprechende Zeile wie folgt:

If Cells(2, 2).Text = "1" Or Cells(2, 2).Text="2" Or Cells(2, 2).Text="3" Then


Hilfts?
Ciao
Thorsten

AW: Zeilen Ein und Ausblenden
23.03.2009 16:53:58
TinoB
ja passt, Danke, da wär ich nicht drauf gekommen.
Tino
AW: Zeilen Ein und Ausblenden
23.03.2009 16:53:18
Tino
Hallo,
versuche es mal so.

Private Sub Worksheet_Change(ByVal Target As Range)
Rows(18).Hidden = (Range("B2") = 1 Or Range("B2") = 2 Or Range("B2") = 3)
End Sub


Gruß Tino

Anzeige

309 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige