Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1064to1068
1064to1068
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Autofilter nicht aktiv nach "BeforeClose"

Forumthread: Autofilter nicht aktiv nach "BeforeClose"

Autofilter nicht aktiv nach "BeforeClose"
01.04.2009 08:09:13
Uli
Ich habe eine Datei mit Blattschutz (Passwort). Es gibt 2 Gruppen User:
1. Gruppe - Dürfen Neueinträge machen, dazu wird über einen Button der Blattschutz aufgehoben. Dieser Teil ist erledigt und funktioniert.
2. Gruppe darf ohne Blattschutz aufheben nur in freigegebenen Zellen Eingaben machen. Auch das funtioniert.
Da aber bei der Gruppe 1 es passieren kann, dass der Blattschutz nicht mehr aktiviert wird, habe ich (dank diesem Forum) im VBA Befehl eingefügt, dass beim Schliessen automatisch der Blattschutz mit Passwort aktiviert wird. 

Option Explicit
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim WsTabelle As Worksheet
For Each WsTabelle In Sheets
WsTabelle.Protect ("401")
Next WsTabelle
End Sub


Mein Problem ist jetzt aber, dass der Autofilter NICHT aktiv ist, aber die Gruppe 2 den braucht.
ist das verständlich was ich meine? Wer hat hier eine Idee?
danke, Uli

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Autofilter nicht aktiv nach "BeforeClose"
01.04.2009 08:29:02
Tino
Hallo,
versuche es mal so und setze UserInterfaceOnly auf True und EnableAutoFilter auch auf True beim öffnen der Datei.
Wichtig ist, der Autofilter muss bereits bestehen sonst geht es nicht.
Tabellenname und Passwort musst Du noch anpassen.

Private Sub Workbook_Open()
'UserInterfaceOnly auf True
Sheets("Tabelle1").Protect "Passwort", , , , True
Sheets("Tabelle1").EnableAutoFilter = True
End Sub


Gruß Tino

Anzeige
AW: Autofilter nicht aktiv nach "BeforeClose"
02.04.2009 13:50:27
Uli
Hallo Tino....
DANKE... hat funktioniert und mir viel Zeit erspart.
lg, Uli
;

Forumthreads zu verwandten Themen

Probleme mit Add In Subs bei Workbook_BeforeClose
Lou

Hallo Gemeinde,
bin neu hier, also erstmal Hallo! an alle.
Ich kämpfe im Moment mit folgendem Problem und finde keine Lösung:
Ich habe viele benutzdefinierte Funktionen und Prozeduren als EXCEL AddIn gespeichert. Die Benutzung aus geöffneten EXCEL-workbooks funktioniert auch wunderb...
15.08.2008 00:53:00
Thread-ID: 1002006
5 Beiträge
beforeClose=Wbs.close or Applicatio.quit
Dirk

Hallo an alle,
nachdem ich nun schon Tage mit Unterstützung der Hilfe sowie diesem Forum an meinem Code rumbastel, brauche ich bitte nochmal eure Hilfe.
Bin dabei ein Workbook_BeforeClose-Makro zu schreiben,das auch andere bestimmte Excelmappen(.xls)falls geöffnet schliessen soll. Dafür...
11.09.2008 14:29:00
Thread-ID: 1009125
9 Beiträge
Anzeige
Prozedur-Fehler bei Auruf über BeforeClose/Save
Rainer

Hi @ all!
Habe da gerade ein mir nicht wirklich erklärbares Problem:
Eine Sub innerhalb derer ein Workbook geöffnet wird, funktioniert einwandfrei.
Nun soll diese Sub aber auch bei entsprechendem Flag ausgeführt werden, wenn der Nutzer die aktuelle Mappe schliesst.
Hab das Ganz...
14.04.2009 16:46:11
Thread-ID: 1068691
9 Beiträge
WorkBook_BeforeClose
Daniel

Hallo,
ich habe eine CheckBox in meiner Datei, die ich gerne beim Schließen
der Datei auf False setzen möcht, sodass sich das Häkchen entfernt.
Wie geht das? Hier mein erfolgloser Versuch:
Private Sub WorkBook_BeforeClose(Cancel As Boolean) CheckBox1 = False End Sub
grüße...
27.04.2009 15:13:02
Thread-ID: 1071394
10 Beiträge
Anzeige
Code ausführen bei BeforeClose
Mandy

Hi zusammen,
ich habe in meinem Excel ein makro, dass auch eine Symbolleiste startet. Wenn ich die Tabellen schliesse, soll auch die Symbolleiste wieder geschlossen werden. Das mache ich so:
Private Sub Workbook_BeforeClose(Cancel As Boolean) Symbolleiste_aus 'Symbolleiste wieder schl...
05.05.2009 10:13:06
Thread-ID: 1072986
5 Beiträge
Workbook_BeforeClose
AgeO

Hallo, liebe Excel-Freunde.
Ich habe bitte folgendes Problem und bitte um eure Hilfe.
Ich habe unter ’DieseArbeitsmappe’ folgenden Code: Private Sub Workbook_BeforeClose(Cancel As Boolean) ActiveWorkbook.Close savechanges:=False 'oder auch ThisWorkbook.Close savechanges:=False End S...
30.06.2010 12:27:13
Thread-ID: 1164685
3 Beiträge
Unterbinden von WorkbookBeforeClose
Andreas X

Ich suche einen VBA-Befehl, mit dem ich bewirken kann, dass das WorkbookBeforeClose-Makro beim Schließen der Datei NICHT gestartet wird. Gibt es sowas?Mit Dank im Voraus,
Andreas
30.04.2002 14:38:41
Thread-ID: 117479
3 Beiträge
Anzeige
Problem mit "Workbook_BeforeClose"
Harald

Hallo zusammen,
weiß jemand warum der folgende Code zum Öffnen einer bestimmten Datei im
Private Sub Workbook_BeforeClose(Cancel As Boolean) Workbooks.Open Filename:="C:\Test\TESTDATEI.xls", UpdateLinks:=3 End Sub nicht funktioniert?
Gruß, Harald
20.01.2011 20:14:37
Thread-ID: 1196615
11 Beiträge
Personl.xls - BeforeClose wird nicht ausgefuehrt
Volker

Hallo Excel-Fans,
kaempfe mit einem sehr merkwuerdigen Verhalten:
Die Personl.xls enthaelt in "DieseArbeitsmappe" 2 Makros:
Private Sub Workbook_Open() und Private Sub Workbook_BeforeClose(Cancel As Boolean),
die bei jedem Oeffnen und Schliessen von Excel abgearbeitet werden sol...
07.03.2011 16:05:30
Thread-ID: 1204610
7 Beiträge
Bei einer bestimmten Datei BeforeClose umgehen
Jürgen

Hallo Excel-Forum,
ich hoffe mir kann jemand von Euch helfen. Schätzungsweise ist das ein kleines Problem.
Hier kurz geschildert:
Beim Öffnen einer Datei kontrolliert diese per Makro, ob es eine aktuellere Version im Netzwerk gibt. Wenn ja speicher sich die Datei als alt weg und öff...
11.08.2011 09:43:59
Thread-ID: 1225668
8 Beiträge
Private Sub Workbook_BeforeClose
Scot

Liebe Leute
Ich hab mal wieder ein kleines Problem. Folgendes habe ich in "DieseArbeitsmappe" geschrieben:
Private Sub Workbook_BeforeClose(Cancel As Boolean) Application.ScreenUpdating = False Application.MoveAfterReturnDirection = xlDown Application.CommandBars("Standard").Visible =...
22.09.2011 13:56:18
Thread-ID: 1231079
11 Beiträge
Überblick: Workbook_/Auto_Close/BeforeClose
Andreas X

Hilfe Hilfe,
kann mir jemand mal einen Überblick geben über die VBA-Befehle:a) Workbook Close
b) Workbook BeforeClosec) Auto Close
d) Auto BeforeClose1. Was sind die Unterschiede in der Anwendung und Wirkung?
2. Muss ich die in VBA in die "Arbeitsmappe" setzen oder in ein Modul?
...
07.06.2002 19:26:23
Thread-ID: 126984
2 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige