Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 23:47:55
Datum ausweisen, wenn definierte Summe erreicht ist
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1380to1384
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1380to1384
1380to1384
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA + Blattschutz + Autofilter -> Sortireren

VBA + Blattschutz + Autofilter -> Sortireren
19.09.2014 07:38:41
Schmitty
Guten Morgen zusammen,
ich nutze einen Autofilter in einem geschützten Blatt. Solange ich den Blattschutz "manuell" über das Menü aktiviere, kann ich ein Häkchen setzten, dass der Autofilter trotzdem funktioniert.
Wenn ich aber Mittels VBA den Blattschutz aktiviere (mit 

ActiveSheet.Protect Password:="", AllowFiltering:=True
) kann ich den Autofilter nicht mehr auswählen.
An sich ist das nun ein riesen Problem, da der Autofilter seine Filter-Argumente aus einer anderen Zelle bezieht, aber ich würde gerne die gefilterten Ergebnisse alphabetisch sortieren...
Jemand eine Idee?
Gruß
Christian

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA + Blattschutz + Autofilter -> Sortireren
19.09.2014 08:21:30
Max
Hallo Christian,
prinzipiell funktioniert dein Makro einwandfrei.
Du musst den Autofilter setzen, bevor du das Makro startest.
Dein Makro erlaubt nur das Auswählen des Filters, aber nicht das Erstellen.
Lg.

AW: VBA + Blattschutz + Autofilter -> Sortireren
19.09.2014 08:42:59
Schmitty
Hallo Max,
danke für deine Antwort.
Das Makro startet immer automatisch beim Öffnen der Excel-Datei und aktiviert automatisch den Blattschutz, damit niemand Daten verändern kann.
Ich dachte, es gibt noch einen VBA-Befehl, der das Blatt schütz, den Autofilter aber weiterhin zulässt...
Gruß
Christian

das geht doch auch ohne VBA ...
19.09.2014 09:35:12
Matthias
Hallo
Es ist so wie Max schreibt.
Wenn Du den Filter gesetzt hast und beim Blattschutz

  • AutoFilter verwenden


aktivierst, dann kannst Du auch den Filter benutzen.
Du musst ihn nur vorher gesetzt haben!
Gruß Matthias

Anzeige
AW: VBA + Blattschutz + Autofilter -> Sortireren
19.09.2014 10:09:19
fcs
Hallo Christian,
wie von Mathias bereits erwähnt muss der Autofilter bereits eingerichtet sein bevor der Blattschutz aktiviert wird.
Allerdings kann man dann nur manuell die Filtereinstellungen ändern.
Wenn du das setzen der Filter per Makro unterstützen willst inkl. sortieren, dann musst du im makro dane Blattschutz kurzzeitig deaktivieren, dann Filter- und Sortieraktionen durchführen und den Blattschutz wieder aktivieren.
Gruß
Franz
Beispiel: 
Sub SetAutofilter()
Dim wks As Worksheet
Set wks = Me.Worksheets("Tabelle1")
With wks
.Activate
.Unprotect Password:=""
If .FilterMode = True Then .ShowAllData
If .Range("A2").Value  "" Then
.AutoFilter.Range.AutoFilter Field:=1, Criteria1:=.Range("A2").Value
Else
.AutoFilter.Range.AutoFilter Field:=1
End If
If .Range("B2").Value  "" Then
.AutoFilter.Range.AutoFilter Field:=2, Criteria1:=.Range("B2").Value
Else
.AutoFilter.Range.AutoFilter Field:=2
End If
With .AutoFilter.Range
.Sort Key1:=.Range("B1"), Order1:=xlAscending, Header:=xlYes
End With
.Protect Password:="", AllowFiltering:=True
End With
End Sub

Anzeige
AW: VBA + Blattschutz + Autofilter -> Sortireren
19.09.2014 16:15:45
Adis
Hallo
ich verweise noch auf die Eigenschaft: ScrollArea für jede Tabelle
Legt man dort einen Eingabebereich fest, z.B. nur die Zelle, "A1"
kann auf keine andere Zelle zugegriffen werden. Ich schütze so Formeln
Gruss Adis

AW: VBA + Blattschutz + Autofilter -> Sortireren
19.09.2014 16:25:14
Schmitty
Hallo Adis,
danke für deine Anmerkung.
Aber wenn ich filter bleiben trotzdem oft 20-30 Zeilen übrig und die will ich mit den Pfeiltasten durchgehen können, deshalb habe ich das Arbeitsblatt geschützt mit der Einstellung "gesperrte Zellen auswählen". Ändern kann dann trotzdem niemand eine Formel...
Gruß
Christian

304 Forumthreads zu ähnlichen Themen

VBA- Autofilter - leere Zeilen löschen
Asits

Hallo,
ich habe in der Spalte "A" Kundennummern stehen.
Ich will per Makro / Autofilter die kompletten Zeilen
derjehnigen Kunden löschen, die noch keine Kundennummer haben.
wie mache ich das ?
Vielen Dank vorab!
17.09.2008 08:48:00
Thread-ID: 1010225
5 Beiträge
Anzeige
Autofilter mit VBA
Steffan

Hallo ihr Lieben,
ich hab ein Problem mit einer Filter Routine. In einer Mitgliederliste soll Excel beim Aufruf der Datei überprüfen, ob Mitglieder ihr Austrittsdatum erreicht haben. In Spalte I stehen diese Daten im Format 31.12.2008.
Aus dem Archiv hab ich mir folgenden Code herausges...
12.01.2009 19:15:39
Thread-ID: 1038988
4 Beiträge
Autofilter per VBA aufrufen
Armin

Hallo,
ich habe folgendes Problem mit VBA.
Ich habe in einer Liste den Autofilter eingebunden. Per VBA selektiere ich Daten nach Datumswerten mit folgendem Code:
Zunächst lese ich das in Zelle A1 vorhandene Datum "01.01.2009" aus und lege dieses in der Variable "datVon" ab. Diese Va...
21.01.2009 15:45:00
Thread-ID: 1042249
4 Beiträge
Anzeige
Problem mit Autofilter über VBA
Antsche


Wunderschönen guten Tag,
ich habe ein Problem bei der Nutzung des Autofilters über VBA.
In meinem Excel-File gibt es Tabellenblätter in denen Datensätze hinterlegt sind. Diese sollen über Eingaben in eine UserForm (ComboBoxen) gefiltert werden. Hier die Datei dazu:
https://www...
18.06.2009 16:53:36
Thread-ID: 1082687
4 Beiträge
VBA: Autofilter auf "0" setzen
David

Hallo zusammen.
Wenn in der Datei ein Autofilter gesetzt ist und auch in einem beliebigen Feld ein Kriterium gesetzt ist, wie bekomme ich per VBA die Anzeige ALLER Elemente hin.
Mein Versuch mit Range(XYZ).Autofilter
löscht diesen komplett, was aber nciht gewollt ist. Und .Autofi...
27.08.2009 09:53:08
Thread-ID: 1098941
3 Beiträge
Autofilter Doppelnennungen filtern über VBA
Emil

Hallo zusammen,
ich habe folgendes Problem innerhalb eines größeren Makros:
Ich habe eine Tabelle aus der ich mittels eines Makros Werte in ein Diagramm übertrage.
Hierzu werden schon Spalten über den Autofilter nach bestimmten Auswahlkriterien gefiltert, das funktioniert alles wund...
03.09.2009 17:33:39
Thread-ID: 1100285
2 Beiträge
Blattschutz - Zugriff auf Autofilter -VBA-
Wolfgang

Hallo,
mit nachstehendem Code wird in allen Tabellenblättern der Blattschutz eingeschaltet. Nun mußte ich feststellen, dass AutoFilter sich nicht bedienen lässt, so dass ich hierzu die nachstehende Ergänzung eingebaut habe. Allerdings ohne Erfolg, es tut sich nichts.- Wie müßte ich den Cod...
26.10.2009 19:52:57
Thread-ID: 1112334
5 Beiträge
Ohne VBA: Wenn Autofilter, dann anderen Zellwert
sunni

Hallo alle zusammen,
gibt es eine Möglichkeit über Excel (ohne VBA) zu sehen, ob ein Autofilter gesetzt ist?
Hintergrund: ich habe eine Formel bei gesetztem Autofilter. Wenn aber kein Autofilter gesetzt ist, soll hier in der Zelle eine 0 oder "" erscheinen.
Geht das?
Vielen Dank...
08.01.2010 12:35:47
Thread-ID: 1128216
8 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
4
2
3
3
4
3
2
1
4
7
1
2
8
8
3
9
11
4
2
4
4
5
3
2
4