Herbers Excel-Forum - das Archiv

Makro in mehreren Arb.-Blättern



Excel-Version: 9.0 (Office 2000)
nach unten

Betrifft: Makro in mehreren Arb.-Blättern
von: Hauke


Geschrieben am: 16.05.2002 - 16:19:32

Hallo ins Forum!

Ich habe hier ein geiles Makro (VBA) bekommen, das die Arbeit mit Autofiltern während das Blatt geschützt ist ermöglicht!! Jetzt wüsste ich gern, ob und wie ich dieses Makro in allen Blättern (7) laufen lassen kann? Es scheint nur in einem zu funktionieren, auch wenn ich in den anderen das gleiche Makro anlege, es klappt nur in dem ersten. Kann mir einer helfen??

Vielen Dank und Grüße aus Flensburg

Hauke


nach oben   nach unten

Re: Makro in mehreren Arb.-Blättern
von: frank p

Geschrieben am: 16.05.2002 - 16:23:57

Du solltest mal den Code posten ..
wir sind ja schließliche keine Hellseher ;-)

nur anhand des codes kann Dir jemand sagen was Du tun könntest .

Gruss Frank p


nach oben   nach unten

Code
von: Hauke


Geschrieben am: 16.05.2002 - 16:40:08

Hi Frank!

Sorry....na klar habe ich vergessen:


Sub BlattSchutz()
ActiveSheet.EnableAutoFilter = True
Tabelle2.Protect userinterfaceonly:=True
End Sub

Mehr ist es nicht. Wie gesagt - funktioniert dann leider nur in einem Blatt....

Hast du eine Idee??

Hauke

nach oben   nach unten

Re: Makro in mehreren Arb.-Blättern
von: Klaus Schubert


Geschrieben am: 16.05.2002 - 21:09:13

Hallo Hauke,

um den Code in allen Blättern verwenden zu können, benutze diesen Code:

Sub BlattSchutz()
ActiveSheet.EnableAutoFilter = True
ActiveSheet.Protect userinterfaceonly:=True
End Sub

Da ich davon ausgehe, dass diese Funktion nach dem Öffnen der Mappe immer vorhanden sein soll ,(wird nämlich meines Wissens nicht mitgespeichert), empfehle ich dir folgendes:

Mit Alt + F11 in die VBA - Umgebung wechseln , im Projektfenster DieseArbeitsmappe doppelklicken und dann rechts folgenden Code einfügen:

Die Arbeitsmappe danach einmal speichern und schließen. Ab jetzt werden alle vorhandenen Tabellenblätter beim Öffnen immer so bearbeitet, dass du den Filter trotz Blattschutz benutzen kannst !

Gruß Klaus


 nach oben

Excel-Beispiele zum Thema "Makro in mehreren Arb.-Blättern"
Druck aus mehreren Tabellenblättern auf eine Druckseite Daten von mehreren Blättern auf ein Druckblatt
Werte in mehreren Spalten sortieren Den selben Bereichsnamen in mehreren Tabellenblättern
Tabelle nach mehreren Kriterien summieren Auswahl von Zellen in mehreren Zeilen verhinden
Wert von einer Zelle zur anderen in mehreren Tabellen übernehmen Benannte Bereich aus mehreren Arbeitsmappen importieren
Filtern über VBA nach mehreren Kriterien Kosten nach mehreren Kriterien erfassen