Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Tabelle beim öffnen ausblenden

Forumthread: Tabelle beim öffnen ausblenden

Tabelle beim öffnen ausblenden
11.07.2008 15:06:00
amina
Hallo alle zusammen,
besteht die Möglichkeit, per VBA, wenn man eine Mappe öffnet, dass eine bestimmte Tabelle ausgeblendet wird? Damit mein keinen Zugriff darauf hat, also so als würde diese überhaupt nicht existieren?
Vielen Dank für Eure Hilfe.
Gruß amina

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Tabelle beim öffnen ausblenden
11.07.2008 15:12:43
Chris
Servus,

Private Sub Workbook_Open()
Sheets("derTabellenname").Visible = xlSheetVeryHidden
End Sub


Gruß
Chris

AW: Nachtrag
11.07.2008 15:15:29
Chris
in das Tabellenmodul DieseArbeitsmappe im VBA-Editor( Alt+F11).

AW: Tabelle beim öffnen ausblenden
11.07.2008 15:16:24
Ramses
Hallo
Ohne VBA:
Tabelle auswählen
Format - Blatt - Ausblenden
Wenn der User den Befehl zum einblenden nicht kennt reicht das
Um es dauerhaft zu machen, reicht einmalig die Anweisung im Direktfenster des VB-Editor's
Worksheets("Deine_Tabelle").Visible = xlVeryHidden
Dann kann sie auch nur noch mit VBA wieder eingeblendet werden
Gruss Rainer

Anzeige
Thanks...
11.07.2008 15:55:00
amina
Hallo alle zusammen,
zur Sicherheit mache ich des lieber per VBA.
Hat auch alles geklappt mit dem Code.
Vielen lieben Dank.
Gruß amina
;
Anzeige
Anzeige

Infobox / Tutorial

Tabelle beim Öffnen Ausblenden in Excel


Schritt-für-Schritt-Anleitung

Um eine Excel-Tabelle beim Öffnen der Datei auszublenden, kannst Du VBA verwenden. Hier ist eine einfache Schritt-für-Schritt-Anleitung:

  1. Öffne den VBA-Editor: Drücke Alt + F11.

  2. Finde das richtige Modul: Klicke im Projektfenster auf "DieseArbeitsmappe".

  3. Füge den Code ein: Kopiere und füge den folgenden VBA-Code in das Modul ein:

    Private Sub Workbook_Open()
       Sheets("derTabellenname").Visible = xlSheetVeryHidden
    End Sub
  4. Speichere die Datei: Achte darauf, die Excel-Datei im .xlsm-Format zu speichern, um die Makros zu aktivieren.

  5. Teste die Funktion: Schließe und öffne die Excel-Datei erneut. Die angegebene Tabelle sollte jetzt ausgeblendet sein.


Häufige Fehler und Lösungen

  • Tabelle wird nicht ausgeblendet: Stelle sicher, dass der Tabellenname im Code korrekt ist. Achte auf Groß- und Kleinschreibung.
  • Makros sind deaktiviert: Überprüfe die Excel-Einstellungen, ob Makros erlaubt sind. Gehe zu Datei > Optionen > Trust Center > Einstellungen für das Trust Center > Makroeinstellungen.
  • Excel-Datei nicht im richtigen Format: Die Datei muss im .xlsm-Format gespeichert werden, damit die Makros funktionieren.

Alternative Methoden

Wenn Du keine VBA-Lösungen verwenden möchtest, gibt es auch eine manuelle Methode, um ein Excel-Tabellenblatt auszublenden:

  1. Tabelle auswählen: Klicke mit der rechten Maustaste auf den Tab der Tabelle.
  2. Blatt ausblenden: Wähle „Blatt ausblenden“ aus dem Kontextmenü.
  3. Dauerhaftes Ausblenden: Um die Tabelle dauerhaft und nur mit VBA wieder sichtbar zu machen, kannst Du im Direktfenster des VBA-Editors folgenden Befehl eingeben:

    Worksheets("Deine_Tabelle").Visible = xlVeryHidden

Praktische Beispiele

Ein Beispiel für das Ausblenden einer Tabelle beim Öffnen könnte so aussehen: Wenn Du eine Tabelle namens "GeheimeDaten" hast, ersetze "derTabellenname" im Code durch "GeheimeDaten". Der angepasste Code sieht dann so aus:

Private Sub Workbook_Open()
    Sheets("GeheimeDaten").Visible = xlSheetVeryHidden
End Sub

Der Code sorgt dafür, dass die Excel-Datei beim Öffnen die "GeheimeDaten"-Tabelle ausgeblendet hat, sodass sie nicht mehr sichtbar ist.


Tipps für Profis

  • Verwende aussagekräftige Tabellennamen: Dies erleichtert das Auffinden der richtigen Tabelle im Code.
  • Dokumentiere Deinen Code: Kommentiere Deine VBA-Codes, damit Du später nachvollziehen kannst, was jeder Abschnitt bewirkt.
  • Backup erstellen: Vor umfangreichen Änderungen immer eine Sicherungskopie der Excel-Datei anlegen.

FAQ: Häufige Fragen

1. Kann ich mehrere Tabellen gleichzeitig ausblenden?
Ja, Du kannst mehrere Tabellen im gleichen Workbook_Open-Sub ausblenden, indem Du mehrere Zeilen hinzufügst:

Private Sub Workbook_Open()
    Sheets("Tabelle1").Visible = xlSheetVeryHidden
    Sheets("Tabelle2").Visible = xlSheetVeryHidden
End Sub

2. Wie kann ich die ausgeblendete Tabelle wieder sichtbar machen?
Um eine ausgeblendete Tabelle wieder sichtbar zu machen, öffne den VBA-Editor, gehe zu "DieseArbeitsmappe" und ändere den Code:

Sheets("derTabellenname").Visible = xlSheetVisible

Mit diesen Schritten kannst Du sicherstellen, dass Deine Excel-Datei gut organisiert bleibt und sensible Daten geschützt sind.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige