MS-Office-Forum
Google
   

Zurück   MS-Office-Forum > Microsoft Office > Microsoft Excel
Registrieren Forum Hilfe Alle Foren als gelesen markieren

Banner und Co.

Antworten
Ads Der Renner, 11 Entwicklertools für Access, Tipps & Trick und offene Datenbanken zum einzigartigen Preis.
Themen-Optionen Ansicht
Alt 14.04.2006, 12:06   #1
cms
Neuer Benutzer
Neuer Benutzer
Standard VBA - Worksheets ausblenden

Hallo Zusammen!

Gibt es IRGENDEINE Möglichkeit, existierende Worksheets im Excel auszublenden? Sie sollen da sein, wenn möglich sollte man auf sie zugreifen können (per Makro oder Formel) aber man soll sie unten in der Auswahlleiste nicht sehen.

Bin für jede Info dankbar!
cms ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 14.04.2006, 12:28   #2
jinx
MS-Office-Forum Team MS-Office-Forum Team
Standard

Moin, cms,

die einfache Variante gibt es auch ohne VBA: Format / Blatt / Ausblenden.

Per VBA sind das bezogen auf die Tabelle2 der aktiven Mappe folgende Zustände:
False wird angezeigt
True wird normal versteckt
xlVeryHidden nur über VBE/Eigenschaftenfenster oder VBA-Code wieder einzublenden:

Code:

Worksheets("Tabelle2").Visible = xlVeryHidden
Innerhalb einer Arbeitsmappe muss immer mindestens eine Tabelle sichtbar bleiben - alle Worksheets sind hingegen bei Nutzung eines AddIns per Definition ausgeblendet...

__________________

cu
jinx


per 31.12.2010 ausgeschiedener User und ehemaliger Excel-

Folgende Tools werden zur optischen Aufbereitung eingesetzt: Code Converter; Excel Jeanie Html
Für die allgemeinen Hinweise: Netiquette; Fragen und Antworten in Foren

eingesetzte Betriebssysteme: XP Home, XP Media Center Edition, XP Professional, Vista Ultimate, 7/Seven
verwendete Programme: Excel97 SR-2, Office 2000 SP-3, Office2002/XP SP-3, Office 2003 Professional SP-3, Office 2007 Home & Student SP-3, Office 2007 Professional SP-3
jinx ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 11.07.2007, 08:44   #3
nobby1951
MOF User
MOF User
Standard

Hallo zusamen,
ich möchte nochmal auf das Problem "Blatt ausblenden bzw. einblenden" zurückkommen.
Ich habe unter Excel 2003 Datei, die aus 13 Blättern besteht. Im Hauptblatt sind nur Verknüpfungen aus den einzelnen Blättern. Diese Blätter versehe ich automatisch mit einem Kennwortschutz wie folgt:
schnipp--------
Sub Blattschutz_ein()
Dim Blatt As Worksheet
For Each Blatt In Worksheets
Blatt.Protect
Next Blatt
End Sub

Sub Blattschutz_aus()
Dim Blatt As Worksheet
For Each Blatt In Worksheets
Blatt.Unprotect
Next Blatt
End Sub
schnipp------

Jetzt möchte ich aber, dass ich nach dem Aktivieren/Deaktivieren des Kennwortes bis auf das Hauptblatt alle anderen Blätter automatisch ein- bzw. ausgeblendet werden.

Kann mir hierbei jemand helfen?

Gruß Nobby
nobby1951 ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 11.07.2007, 08:48   #4
Styrkar
MOF Profi
MOF Profi
Standard

Das geht recht einfach:
Code:

Sub Blattschutz_ein()
Dim Blatt As Worksheet
    For Each Blatt In Worksheets
        Blatt.Protect
        If Blatt.Name <> "Name Hauptsheet" Then Blatt.Visible = xlSheetVeryHidden
    Next Blatt
End Sub

Sub Blattschutz_aus()
Dim Blatt As Worksheet
    For Each Blatt In Worksheets
        Blatt.Unprotect
        Blatt.Visible = xlSheetVisible
    Next Blatt
End Sub
Styrkar ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 11.07.2007, 09:38   #5
nobby1951
MOF User
MOF User
Standard

Vielen Dank für die schnelle Hilfe

Gruß Nobby
nobby1951 ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Ads
Antworten


Aktive Benutzer in diesem Thema: 1 (Registrierte Benutzer: 0, Besucher: 1)
 
Themen-Optionen
Ansicht

Forumregeln
Es ist Ihnen nicht erlaubt, neue Themen zu verfassen.
Es ist Ihnen nicht erlaubt, auf Beiträge zu antworten.
Es ist Ihnen nicht erlaubt, Anhänge anzufügen.
Es ist Ihnen nicht erlaubt, Ihre Beiträge zu bearbeiten.

vB Code ist An.
Smileys sind An.
[IMG] Code ist An.
HTML-Code ist An.
Gehe zu


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:40 Uhr.


Partner und Co.
Access-Paradies -Alles rund um die Datenbank Microsoft Access -Code -Programme-Tools -Tipps   Kostenlose Tipps & Tricks, Downloads und Programme   www.kulpa-online.com - Tipps - Tricks - Tutorials - Meinungen - Downloads uvm...   vb@rchiv · Willkommen in der Welt der VB Programmierung   Access-Garhammer - Hier finden Sie jede Menge Beispiel-Datenbanken zu Access und mehr ...   mcseboard.de   Die Top Seite für Excel-VBA-Makros uvm.

Powered by: vBulletin Version 3.6.2 (Deutsch)
Copyright ©2000 - 2014, Jelsoft Enterprises Ltd.

Copyright ©2000-2010 MS-Office-Forum. Alle Rechte vorbehalten.
Copyright ©Design: Manuela Kulpa ©Rechte: Günther Kramer
Eine Verwendung der Inhalte in anderen Publikationen, auch auszugsweise,
ist ohne ausdrückliche Zustimmung der Autoren nicht gestattet.
Beachten Sie bitte auch unsere Nutzungsbedingungen.