Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
Anzeige
Archiv - Navigation
460to464
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
460to464
460to464
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Ausblenden von Tabellenblättern

Ausblenden von Tabellenblättern
28.07.2004 14:56:29
Tabellenblättern
Hallo,
habe ich die möglich keit aufgrund einer bestimmten Konstellation/Zelleneintrag ein bestimmtes Tabellenblatt der Arbeitsmappe auszublenden?
Wie würde es gehen?
Bsp. Zelle A1 steht "x" und Tabelle 1 blendet sich aus
Zelle A1 steht " " und Tabelle 1 ist wieder eingeblendet
Vielen Dank im Voraus, ALex

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

Betreff
Datum
Anwender
Anzeige
AW: Ausblenden von Tabellenblättern
Tabellenblättern
Hi Alex,
versuch es mal so.
Den Code in "Diese Arbeitsmappe"

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Cells(1, 1).Value = "x" Then
Worksheets("Tabelle1").Visible = False
End If
End Sub

Gruß
AndréL.
Rückmeldung wäre nett!!
Der komplette Code
André

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Cells(1, 1).Value = "x" Then
Worksheets("Tabelle1").Visible = False
Else
If Cells(1, 1).Value = "" Then
Worksheets("Tabelle1").Visible = True
End If
End If
End Sub

Anzeige
AW: Der komplette Code
29.07.2004 08:16:23
Alex-1969
Hi André,
leider hatte ich keinen Erfolg stelle mich sicher etwas dämlich an was VBA betrifft.
Hier mal die Datei: https://www.herber.de/bbs/user/9031.xls
Der Eintrag 'x' steht in 'Diese Arbeitsmappe' und 'Tabelle1' soll sich ein- oder ausblenden.
Danke und Gruß, Alex.

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige