Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
26.04.2024 16:05:28
PivotChart-Stapeldiagramm erstellen
26.04.2024 15:34:42
Überlagernde Textbox-Ansicht
26.04.2024 15:27:20
Excel öffnet nach Auswahl einer Excel diese leer
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1880to1884
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
1880to1884
1880to1884
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA - verstecktes Arbeitsblatt mit Butto

VBA - verstecktes Arbeitsblatt mit Butto
16.05.2022 16:33:01
Heiko
Hallo in die Runde,
ich habe verschiedene Kalkulationsprogramme. In diesen häufig sind Arbeitsblätter ausgeblendet.
Nun möchte ich zur Vereinfachung ein Button-Menue erstellen. Drücke ich z.B. den Button "Erodieren" öffnet sich das versteckte Arbeitsblatt "Erodieren" und ich kann meine Eintragungen vornehmen. Auf diesem Blatt ist dann auch ein Button "Schließen", der das Blatt wieder ausblendet und mir den Rücksprung in die Basiskalkulation ermöglicht.
Da ich kein Beispiel hierfür gefunden habe mag ich die Frage stellen, ob mir hier ein Wissender helfen kann.
Viele Grüße sendet der Heiko

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA - verstecktes Arbeitsblatt mit Butto
16.05.2022 16:48:42
ralf_b
damit schaltest du das Blatt Tabelle2 um von sichtbar auf unsichtbar und zurück. 

Sub Makro1()
With Worksheets("Tabelle2")
.Visible = Not (.Visible)
End With
End Sub

AW: VBA - verstecktes Arbeitsblatt mit Butto
16.05.2022 16:53:06
UweD
Hallo
Auf dem Übersichtsblatt entsprechende ActiveX Buttons anlegen
Doppelclick auf einen der Buttons.
Diesen Code dann dort einfügen:

Option Explicit
Private Sub CommandButton1_Click()
With Sheets("Erodieren")
.Visible = True
.Activate
End With
End Sub
Private Sub CommandButton2_Click()
With Sheets("Fräsen")
.Visible = True
.Activate
End With
End Sub
ActiveX Button auf das Erodieren Blatt einfügen
Doppelclick
Diesen Code einfügen

Private Sub CommandButton1_Click()
ActiveSheet.Visible = False
Sheets("Übersicht").Activate
End Sub
Dieses Blatt dann für die anderen Verfahren kopieren.
LG UweD
Anzeige
AW: VBA - verstecktes Arbeitsblatt mit Butto
17.05.2022 15:06:03
Heiko
Vielen herzlichsten Dank!!! Hat super funktioniert, bin begeistert!
Danke für die Rückmeldung (owT)
17.05.2022 16:24:02
UweD
Ergänzung
16.05.2022 18:00:30
Rudi
Hallo,
zum Ausblenden evtl.

.Visible = xlSheetVeryHidden
nehmen, damit man es nicht über das Menü einblenden kann.
Gruß
Rudi

Links zu Excel-Dialogen

CommandButton

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige