Live-Forum - Die aktuellen Beiträge
Datum
Titel
15.10.2025 16:22:17
Datum ist nicht Datum :(
15.10.2025 15:02:20
Blockpfeile mit Makro gehen nicht mehr nach freigabe
15.10.2025 13:51:13
VBA - Fortschrittsbalken unabhängig von Zellen
15.10.2025 13:31:47
WENN Formel mit zwei Bedingungen über 4 Spalten...
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1288to1292
1288to1292
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Makro beim Öffnen starten

Forumthread: Makro beim Öffnen starten

Makro beim Öffnen starten
26.11.2012 07:11:03
Heidi
Guten Morgen,
ich habe ein Makro, es hat bisher gut funktioniert, aber leider klappt es jetzt nicht mehr. Dieses Makro soll beim Öffnen der Arbeitsmappe bestimmte Blätter sperren und nur die Gliederung und Autofilter zulassen (mit Passwortschutz). Es sollen noch mehrere Tabellenblätter dazu kommen. Leider kriege ich es nicht hin, dass er dieses Makro für ALLE Tabellenblätter übernimmt.
Vielleicht kann mir jemand helfen?
Sub Workbook_Open()
With Worksheets("LK 24.09.2012")
.Protect UserInterfaceOnly:=True, Password:="lk"
.EnableOutlining = True ' Für Gliederung
.EnableAutoFilter = True ' Für AutoFilter
End With
With Worksheets("LK 28.06.2012")
.Protect UserInterfaceOnly:=True, Password:="lk"
.EnableOutlining = True ' Für Gliederung
.EnableAutoFilter = True ' Für AutoFilter
End With
With Worksheets("LK 27.08.2012")
.Protect UserInterfaceOnly:=True, Password:="lk"
.EnableOutlining = True ' Für Gliederung
.EnableAutoFilter = True ' Für AutoFilter
End With
Vielen lieben DANK!

Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro beim Öffnen starten
26.11.2012 09:00:41
Heidi
Hallo Ihr Lieben,
hat vielleicht jemand eine Idee was ich ändern muss, damit die Makros auch funktionieren?
Danke!

AW: Makro beim Öffnen starten
26.11.2012 10:28:34
Rudi
Hallo,
für alle, die mit LK anfangen: 
Private Sub Workbook_Open()
Dim wks As Worksheet
For Each wks In Worksheets
If Left(wks.Name, 2) = "LK" Then
With wks
.Protect UserInterfaceOnly:=True, Password:="lk"
.EnableOutlining = True ' Für Gliederung
.EnableAutoFilter = True ' Für AutoFilter
End With
End If
Next
End Sub

Gruß
Rudi

Anzeige
AW: Makro beim Öffnen starten
26.11.2012 11:13:28
Heidi
Hallo Rudi,
super, es hat geklappt. Besten DANK!

AW: Makro beim Öffnen starten
27.11.2012 12:13:13
Heidi
Hallo Rudi,
mir ist noch aufgefallen, dass wenn ich ein neues Tabellenblatt erstelle, welches auch mit LK... beginnt, dass er dies aber nicht sperrt so wie die anderen Blätter.
Erst wenn ich bei jedem Tabellenblatt den Blattschutz entferne und dann schliesse/speicher, dann funktioniert es - ist aber auch umständlich.
Was mache ich falsch?
Danke für deine Rückmeldung.

Anzeige
AW: Makro beim Öffnen starten
27.11.2012 12:24:39
Rudi
Hallo,
versuchs mal so: 
Private Sub Workbook_Open()
Dim wks As Worksheet
For Each wks In Worksheets
If Left(wks.Name, 2) = "LK" Then
With wks
If Not .ProtectContents Then
.Protect UserInterfaceOnly:=True, Password:="lk"
.EnableOutlining = True ' Für Gliederung
.EnableAutoFilter = True ' Für AutoFilter
End If
End With
End If
Next
End Sub

Anzeige
AW: Makro beim Öffnen starten
27.11.2012 12:28:13
Heidi
Hallo,
es klappt, super - vielen DANK.

AW: Makro beim Öffnen starten
27.11.2012 12:30:04
Heidi
Hallo,
es klappt, super vielen lieben Dank!
;

Forumthreads zu verwandten Themen

Wenn dann mit VBA und Makro starten
Thomas

Hallo guten Morgen liebe Helfer,
ich komme mit einer Wenn Dann Formel im VBA nicht klar. Wer kann mir bitte helfen.
WENN Zelle C1 = OK DANN starte Makro1 sonst MsgBox "Eingabe leider falsch"
Ich schaffe es einfach nicht das ich innerhalb der Abfrage ein Makro starten lasse möchte we...
31.01.2009 09:18:37
Thread-ID: 1045583
4 Beiträge
Anzeige
Datei mit ungültigem Blattnamen per Makro öffnen
sile1234

Hallo liebe Herber Gemeinde,
ich habe eine *.xls Datei die von einem Programm exportiert wird. Diese möchte ich gerne mit Excel weiterbearbeiten und mit einem Makro dort diverse Informationen herausziehen. Leider wird der Blattname mit Zeichen exportiert mit denen Excel 2003 nichts anfangen...
07.08.2009 14:14:42
Thread-ID: 1094255
4 Beiträge
Anzeige
vba Code ausführen, bei Wechsel zu Excel
Karsten

Hallo und guten Abend,
ich wechsel von einer Internetseite mit der Tastenkombination Alt Tab zu Excel.
Bislang habe ich den vba Code einem Button zugewiesen und über diesen ausgeführt.
Nun soll dieser vba Code ausgeführt werden, wenn Excel den Focus erhält, wenn das entsprechende Ar...
14.08.2009 21:53:59
Thread-ID: 1096096
6 Beiträge
Blatt öffnen - Makro ausführen
Frank

Hallo Zusammen!
Meine Frage: Wenn ich z.B. in einer Arbeitsmappe Tabelle5 öffne soll ein Makro ausgeführt werden. Wie muss die Befehlzeile hierfür aussehen?
Ich hoffe, es weiß jemand Rat!!! Danke!!!
Gruß Frank H.
10.09.2009 09:49:43
Thread-ID: 1101676
3 Beiträge
makro - datei mit variabler Datum öffnen
meixner

Hallo zusammen,
brauche ein Makro, daß eine Datei automatisch öffnet, deren Datum sich quartalsweise ändert!
Datei = "I:\99\8801\FM\IA files \Fondsbestand_20090907"
Datei heißt im Dez. aber Fondsbestand_20091207. Kann ich das Datum irgendwie variabel anlegen?
mit Datei = "I:\99\...
03.10.2009 21:02:11
Thread-ID: 1107038
2 Beiträge
Datei mit bestimmten Namen öffnen
Holla

Ich hab ein makro, dass auf Knopfdruck auffordert eine Datei zu öffnen.
Wie kann man es verhindern, dass die falsche ausgewählt wird. Die Namen der Dateien sind immer in folgender Form: XMLVJT2_JJJJ_Qx.xls , wobei JJJJ und X variabel sind.
Kann man da eine Fehlermeldung einbauen, wenn m...
13.11.2009 12:40:42
Thread-ID: 1116875
6 Beiträge
VBA-Code ausführen bei Änd. v. Pivotabellen | Herbers Excel-Forum
Al
Hallo,
ich möchte VBA-Code ausführen lassen, wenn in einer Pivotabelle ein Zeilen-,Spalten oder Seiten-Feld verändert/ausgewählt wird.
Worksheet_Calculate kann ich nicht nutzen, da der Code selbst im Worksheet Änderungen durchführt, die wieder Worksheet_Calculate aufrufen.
Worksheet_Ch...
15.01.2010 15:04:20
Thread-ID: 1130302
4 Beiträge
Anzeige
Makro Frage beim Öffnen von pdf Dateien verhindern
pdf

Hallo Herber Fans,
ich baue gerade an einem Code, der den Wert der ActiveCell als Dateinamen annimmt und aus einem vorgegebenen Pfad die Datei öffnen soll. Wenn keine Dateiendung angegeben ist, werden alle gängigen Endungen durchgeloopt. Bei .pdf Dateien habe ich nun das Problem, daß die Fr...
15.01.2010 17:42:31
Thread-ID: 1130350
3 Beiträge
Anzeige
Makro beim beim Öffnen von .xls autmatisch starten
Andi

hallo zusammen,ich habe schon recherchiert, aber leider nichts gefunden.deshalb wende ich michdirekt an die spezis.
wie kann ich ein makro automatisch beim start einer excel-datei starten und wo muß ich das makro plazieren??dank im voraus
mfg
11.04.2002 09:59:08
Thread-ID: 112333
4 Beiträge
Makro beim Öffnen starten
Hajo
Hallo Mikeschreibe Dein Makro in DieseArbeitsmappe unter
Private Sub Workbook_Open()
Gruß Hajo
15.04.2002 20:57:39
Thread-ID: 113531
11 Beiträge
Makro starten nach Öffnen der Arbeitsmappe
meixner

Hallo zusammen,
ich möchte das unteres Makro nach Eröffnen der Excel - Arbeitsmappe automatisch ausgeführt wird.
Was muss ich da machen?
Vielen Dank für Tips.
Dani.
Sub Update_bestände() 'Fondsbestände werden aktualisiert Range("B23").Select Sheets("AlleBestände_alleFonds")....
01.02.2010 11:23:24
Thread-ID: 1134745
6 Beiträge
Makroeditor stürzt beim Öffnen ab
andi

Hallo zusammen,
ich habe jetzt seit ca. 2 wochen das Problem, dass auf einem Rechner Excel abstürzt, sobald man versucht den Makro-Editor zu öffnen, oder irgendein Makro auszuführen. Es stürzt selbst dann ab, wenn man den Editor in einem neuen, leeren Workbook öffnet. Hat also nichts mit de...
24.02.2010 13:07:32
Thread-ID: 1140626
3 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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