Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
19.04.2024 17:05:40
Zählen von Zeilen, in denen in bestimmten Bereich Daten sind
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
428to432
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
428to432
428to432
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Makro Für Blatt Einblenden resp. Ausblenden

Makro Für Blatt Einblenden resp. Ausblenden
18.05.2004 08:44:38
Joerg
Guten Tag,
Ich möchte durch eine Wenn-Abfrage in einer Zelle Ein Blatt Ein- resp. Ausblenden.
Wechselt der Wert in der Zelle von 0 auf einen Wert <>0 soll das Blatt eingeblended werden.
Wechselt der Wert zurück auf 0, soll das Blatt ausgeblendet werden.
Kann mit jemenad helfen?
Besten Dank im Voraus
Joerg

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro Für Blatt Einblenden resp. Ausblenden
18.05.2004 08:53:52
Oberschlumpf
Hi Joerg
Versuch es mal so:

Sub EinAus()
If Var = 0 then
Workbook("DeineExcelTabelle").Sheets("DeinTabblatt").Visible = False
Else
Workbook("DeineExcelTabelle").Sheets("DeinTabblatt").Visible = True
End If
End Sub

Für "DeineExcelTabelle" musst Du den Namen der Exceltabelle oder als Zahl den Index der Excel-Tabelle eintragen, die gemeint ist.
Für "DeinTabblatt" musst Du den Namen oder als Zahl den Index des Tabelleblattes eintragen, welches ein- bzw. ausgeblendet werden soll.
Konnte ich helfen?
Ciao
Thorsten
AW: Makro Für Blatt Einblenden resp. Ausblenden
18.05.2004 16:12:57
Joerg
Liber Thorsten,
Recht herzlichen Dank für deinen Vorschlag.
leider komme ich damit noch nicht zurecht.
Mir scheint dass ich im Tabellenblatt eine Abfrage definieren muss.
Diese Abfrage sollte dann die Prozedur aufrufen, oder?
Liebe Grüsse
Jörg
Anzeige
AW: Makro Für Blatt Einblenden resp. Ausblenden
18.05.2004 17:22:47
Oberschlumpf
Hi Jörg
Verrate doch mal bitte, um welche Zelle in welchem Tabellenblatt es sich handelt.
Und Du weißt auch, dass Du diese Zelle von einem anderen Tabellenblatt mit Werten <> 0 füllen musst, wenn das Tabellenblatt, und dann eben die Zelle, um die es geht, ausgeblendet ist.
Ciao
Thorsten
AW: Makro Für Blatt Einblenden resp. Ausblenden
20.05.2004 10:43:34
Joerg
Hallo Thorsten,
Recht herzlichen Dank fürr dein Interesse.
Habe den wesentlichen Teil meines Arbeitblattes auf den Server geladen.
Celle C11 soll Blatt 00 einblenden oder ausblenden.
Celle C12 Blatt 01
Mit freundlichem Gruss
Jörg
AW: Makro Für Blatt Einblenden resp. Ausblenden
20.05.2004 13:56:09
Martin Beck
Hallo Jörg,
in C11 und C12 stehen doch gar keine Wenn-Formeln. Welche Wenn-Formeln willst Du denn einsetzen? Evtl. könnte man das Worksheet_Calculate-Ereignis nutzen.
Gruß
Martin Beck
Anzeige
AW: Makro Für Blatt Einblenden resp. Ausblenden
20.05.2004 20:09:47
Joerg
Hallo Thorsten,
eben diese Formeln suche ich noch. Was du mir zuerst empfohlen hast funktioniert nicht.
Gruss
Jörg
AW: Makro Für Blatt Einblenden resp. Ausblenden
20.05.2004 21:19:15
Oberschlumpf
Hallo Joerg
Zuerst:
Bitte lies bei den Antworten AUCH die Namen der Ersteller dieser Antworten.
Denn...
...der Hinweis, dass in C11 und C12 noch gar keine Wenn-Formel steht, kommt NICHT von THORSTEN sondern von MARTIN.
nur mal so anmerk...
Zu Deiner Frage:
Lad diese Datei runter.
https://www.herber.de/bbs/user/6570.xls
Der Code steht an der richtigen Stelle und funktioniert nun auch :)
Sobald in C11 0 eingetragen wurde, wird das Blatt 00 ausgeblendet.
Ist der Wert größer als 0, wird das Blatt 00 wieder eingeblendet.
Gleiches geschieht in Zelle C12 mit Blatt 01.
Wenn Du aber tatsächlich möchtest, dass eines der Blätter NUR wieder eingeblendet werden soll, wenn der jeweilige Wert 1 aber NICHT größer als 1 ist, dann musst Du den vollständigen Code durch diesen ersetzen:
If Target.Address = "$C$11" Then
If Target.Value = 0 Then
Sheets("00").Visible = False
End If
End If
If Target.Address = "$C$11" Then
If Target.Value = 1 Then
Sheets("00").Visible = True
End If
End If
If Target.Address = "$C$12" Then
If Target.Value = 0 Then
Sheets("01").Visible = False
End If
End If
If Target.Address = "$C$12" Then
If Target.Value = 1 Then
Sheets("01").Visible = True
End If
End If
Na, welche Version ist die Richtige? :-)
Ciao
Thorsten
Anzeige
AW: Makro Für Blatt Einblenden resp. Ausblenden
21.05.2004 15:34:24
Joerg
Lieber Thorsten,
Ich bitte um Entschuldigung wegen der Verwechslung. Ich war in Eile.
Vorest mal recht herzlichen Dank für die Hilfe.
Ich muss es noch ausprobieren und genau anschauen.
Mit freundlichem Gruss
Jörg
AW: Makro Für Blatt Einblenden resp. Ausblenden
20.05.2004 10:49:35
Joerg
Hier ist die Datei.

Die Datei https://www.herber.de/bbs/user/6558.xls wurde aus Datenschutzgründen gelöscht

Gruss
Jörg

14 Forumthreads zu ähnlichen Themen

VBA - Nur 3-stellige Tabellenblätter anzeigen
Julian

Hallo Community,
ich verzweifle gerade an dem Inhalt einer in einer UserForm befindlichen ComboBox.
Zurzeit werden mir in dieser ComboBox alle Tabellenblätter angezeigt. Ich möchte jedoch nur die angezeigt bekommen, die dreistellig sind.
Hier mein bisheriger Code: Private Sub Comma...
15.12.2015 16:36:22
Thread-ID: 1464519
5 Beiträge
Anzeige
VBA Zeilen und Tabellenblätter ein- und ausblenden
Frank

Hallo zusammen,
ich habe folgende VBA-Codes, die beide einzeln funktionieren. Nun möchte ich, dass beide zusammen funktionieren. Könnt ihr mir da bitte helfen?
Wenn auf dem Tabellenblatt "Start" in Zelle "J15" eine 3 ausgegeben wird, dann soll das Tabellenblatt "Erfolgskontrolle" eingeb...
19.11.2018 08:03:33
Thread-ID: 1658107
7 Beiträge
VBA Blatt einblenden bei bestimmten Zellenwerten
Tobias

Hallo liebes Forum,
Ich stehe erneut vor einem Problem und hoffe auf eure Lösung dabei :)
Leider kann ich meine Datei nicht hochladen, da diese extrem komplex ist und mit noch 2 anderen Dateien verknüpft ist etc.. Daher versuch ich mal zu erklären was ich brauche.
Also ich habe in...
18.01.2019 11:52:24
Thread-ID: 1669138
2 Beiträge
Anzeige
VBA - Ausgeblendetes Blatt beim Einblenden löschen
Fritz
Hallo VBA-Experten,
noch eine Bitte an euch:
Ist es per VBA möglich, dass ein ausgeblendetes Tabellenblatt beim Einblenden sofort gelöscht wird?
Danke für eure Hilfen!
Mfg
Fritz
03.03.2004 16:52:00
Thread-ID: 392047
3 Beiträge
Ausgeblendete Zellen wieder einblenden
Cruiser
Hallo,
ich hab da ein Problem und ich bin mir sicher, dass ihr mir da weiter helfen könnt.
Wenn ich in Excel Zeile oder Spalten ausblende klappt das Problemlos. Allerdings weiß ich nicht genau wie man sie wieder hervor holt.
Jetzt habe ich eine Datei bekommen bei der an der Seite ein + war...
22.12.2004 17:33:59
Thread-ID: 537088
5 Beiträge
Ausgeblendete Blätter wieder einblenden
Hauke

Wenn ich in einer Excel-Datei mehrere Blätter ausblende, muss ich immer jedes einzelne Blatt wieder einzeln einblenden. Gibt es einen Trick, wie man alle ausgeblendeten Blätter auf einmal wieder einblenden kann?
08.01.2007 15:08:17
Thread-ID: 834929
2 Beiträge
VBA Modul Blatt einblenden/ausblenden
Steffen

Hallo Excel-Gemeinde,
habe ein großes Problem, mein bis vor kurzem funktionierendes Makro zeigt neuerdings eine Fehlermeldung an. Laufzeitfehler 1004 in Zeile " "
Es geht weder das Ein-noch Ausblenden im Makro der Tabellenblätter "Daten1" noch "Daten2" für die ExcelTabelle jedes m...
09.08.2020 17:50:38
Thread-ID: 1776128
7 Beiträge
VBA Tabellenblätter ein/ausblenden
Michael

Hi zusammen,
ich steh gerade irgendwie auf dem Schlauch.
Ich habe eine Datei mit recht vielen Tabellenblättern, die ich per Makro ein- und ausblenden will. Dazu hab ich eine Tabelle (AQ41:AR59). In AQ stehen jeweils die Namen der Tabellenblätter. In AR steht "ja" oder "nein".
Ich...
11.12.2020 13:03:37
Thread-ID: 1799133
4 Beiträge

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
4
2
6
1
3
2
4
1
6
3
1
5
5
7