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

Autofilter bei geschützem Blatt

Autofilter bei geschützem Blatt
Dave
Hallo zusammen,
wenn das Arbeitsblatt mit folgendem Code:
Sub schuetzen()
ActiveSheet.Protect Password:="xxx", _
Contents:=True, _
Scenarios:=True, _
UserInterfaceOnly:=True, _
AllowFormattingCells:=False, _
AllowFormattingColumns:=False, _
AllowFormattingRows:=False, _
AllowInsertingColumns:=False, _
AllowInsertingRows:=False, _
AllowInsertingHyperlinks:=False, _
AllowDeletingColumns:=False, _
AllowDeletingRows:=False, _
AllowSorting:=False, _
AllowFiltering:=True, _
AllowUsingPivotTables:=False
End Sub

geschützt ist, führt jeder Aufruf der Filterfunktionen im UF-Code zum Debugger.
Gibt es da noch eine andere Möglichkeit, außer den BS temporär aufzuheben und hinterher wieder zu setzen?
Danke und Gruß
Dave

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

Betreff
Benutzer
Anzeige
AW: Autofilter bei geschützem Blatt
24.08.2012 09:11:32
Nepumuk
Hallo,
du musst den Autofilter auch zulassen.
Sub schuetzen()
    With ActiveSheet
        .Protect Password:="xxx", _
            Contents:=True, _
            Scenarios:=True, _
            UserInterfaceOnly:=True, _
            AllowFormattingCells:=False, _
            AllowFormattingColumns:=False, _
            AllowFormattingRows:=False, _
            AllowInsertingColumns:=False, _
            AllowInsertingRows:=False, _
            AllowInsertingHyperlinks:=False, _
            AllowDeletingColumns:=False, _
            AllowDeletingRows:=False, _
            AllowSorting:=False, _
            AllowFiltering:=True, _
            AllowUsingPivotTables:=False
        .EnableAutoFilter = True
    End With
End Sub

Gruß
Nepumuk

Anzeige
AW: Autofilter bei geschützem Blatt
24.08.2012 10:26:51
Dave
Hallo Nepumuk,
die Option kannte ich noch nicht.
Funzt!
Danke und Gruß
Dave

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige