Ich habe vor einiger Zeit eine Mappe erstellt, in welcher die einzelnen Sheets über eine Shaltfläche geöffnet werden können, wenn das Passwort richtig eingetragen ist.
In dieser Mappe hat es aber auch andere Sheets welche nur zur Information dienen und nicht passwortgeschützt sind.
Nun würde ich gerne auf einem seperaten Sheet (ebenfalls passwortgeschützt) alle passwortgeschützten Sheets untereinander zusammenfassen, jedoch die Sheets welche zur Information dienen nicht.
Bisher habe ich nur Möglichkeiten gefunden, wie alle Seiten der Mappe auf einem Blatt zusammengefasst werden, jedoch nicht wie dies selektioniert werden kann.
Die Blätter welche zusammengefasst werden sollen sind alle gleich formatiert und haben alle die gleiche Titelzeile. Jedoch werden sie immer wieder erwitert, also sollten die neuen Einträge auch automatisch auf der Zusammenfassung erscheinen.
Ich habe euch ein frei erfundenes Beispiel angehängt. Die Passwörter sind jeweils was auf der geklickten Schaltfläche steht (Büromaterial, Medikamente, Verpflegung, Zusammenfassung). Das Blatt Artikel ist eines der rein zu Informationszwecken dienenden Bätter, also dieses muss nicht auf die Zusammenfassung.
gleichartige Daten gehören ohnehin auf ein Tabellenblatt. Den Quatsch mit dem Passwort kannst du auch vergessen, das lässt sich ganz einfach aushebeln, selbst wenn das in der Originaldatei etwas intelligenter gemacht ist, als im Beispiel.
Viele Grüße
Klaus-Dieter Der Erfolg hat viele Väter, der Misserfolg ist ein Waisenkind Richard Cobden
ob ein Passwort Quatsch ist, nur weil die Daten damit nicht besonders sicher sind, kann ich nicht einschätzen. Ich nehme an, dass es arbeitsrechtlich relevant sein könnte, ob man auf Daten, die einen nichts angehen, einfach so einen Blick werfen kann oder sie sich aus einem entsprechend geschützten Blatt holt, auch wenn der Schutz nur schwach ist...
Ein Blatt kann man doch einfach selektieren, z.B.
Sheets("Tabelle1").Select
Range("A1") = "Range ohne Punkt"
Dazu muss es aber sichtbar sein.
Wenn Du mit einem unsichtbaren Blatt etwas anfangen willst, dann z.B. mit
With Sheets("Tabelle1")
.Range("A1") = "Range mit Punkt"
End With
Für die Zusammenfassung kannst Du überlegen, ob Du das wirklich bei jedem Eintrag auf einem anderen Blatt machen willst oder z.B. nur dann, wenn Du das Blatt einblendest. Da könntet Du auch alles komplett erneuern. Eventuell könntest Du auch PowerQuery zum zusammenfassen nehmen.
. \\\|/// Hoffe, geholfen zu haben. ( ô ô ) Grüße, André aus G in T ooO-(_)-Ooo (Excel 97-2019+365)
Folgende(r) 1 Nutzer sagt Danke an schauan für diesen Beitrag:1 Nutzer sagt Danke an schauan für diesen Beitrag 28 • Timon Galeazzi
Nun es geht nicht um die Sicherheit der Daten sondern darum, dass die Tabelle so sehr übersichtlich ist. Es arbeiten sehr viele an der Originaldatei und mit dieser Lösung haben wir eine einfache Übersicht und es muss nicht in den Blättern gesucht werden. Zudem ist es ein Vorteil, dass nicht jeder x-beliebige dahergelaufene sich alle Daten ansehen kann, auch wenn diese nicht unbedingt vertraulich sind.
Aber ich denke den Nutzen welchen wir bei uns aus dieser Tabelle ziehen ist nichts was hier im Forum besprochen werden muss.
Falls du jedoch eine Idee zu meiner Frage hast wäre ich sehr dankbar für dienen Input.
Zitat:Nun würde ich gerne auf einem seperaten Sheet (ebenfalls passwortgeschützt) alle passwortgeschützten Sheets untereinander zusammenfassen
wie ich meine, würde die Zusammenfassung alleine, ohne Berücksichtigung der Passwortfrage, völlig ausreichen. Es macht wenig Sinn, die gleichen Daten auf mehreren Tabellenblättern vorzuhalten. Je nachdem wie die Daten zusammen geführt werden, kann das auch fehlerträchtig sein.
Viele Grüße
Klaus-Dieter Der Erfolg hat viele Väter, der Misserfolg ist ein Waisenkind Richard Cobden
Also es soll eine Zusammenfassung aller Daten aus den ausgewählten Blättern sein. Ein Filter wie in deinem Beispil ist nicht nötig, danke aber für den Vorschlag. :)
Eigentlich soll es bloss ein "Copy & Paste" auf das Blatt Zusammenfassung geben mit dem einzigen Unterschied, dass neue Einträge in einem der anderen Blätter auf der Zusammenfassung aktualisiert werden. Dies kann auch über eine Schaltfläche ausgelöst werden und muss nicht unbedingt automatisch passieren.
Einige Blätter müssen aber nicht auf die Zusammenfassung, gut wäre es wenn ich die Namen der nötigen Blätter im Code eintragen könnte (sind ca. 8 Blätter).
Wenn du den Code für mich schreiben könntes wäre ich dir sehr dankbar. Leider bin ich mit dem Syntax nicht wirklich vertraut.
Ich verstehe was du meinst. In der Originaltabelle handelt es sich um die Verkäufe unseres Sales-Teams. Die Blätter sind nach geografischen Kriterien aufgeteilt (USA, China, Japan usw.). Zudem sind sie auch nach Mitarbeiter aufgeteilt so dass jeder Mitarbeiter seine Verkäufe auf einem eigenen Blatt eintragen kann.
Die Zusammenfassung soll zur Auswertung dienen und die einzelnen Blätter dienen der Übersichtlichkeit der Mappe.
Damit nicht ständig 15 Blätter offen sind, und damit nicht alle einfach so alles nachlesen können (auch wenn nicht streng vertraulich), haben wir uns für die Variante mit dem Passwort entschieden.
Mir ist bewusst, dass dieses im VBA nachgelesen werden kann aber es hat sich bisher als sehr praktisch erwiesen.
![[-]](https://www.clever-excel-forum.de/images/collapse.png)
