Live-Forum - Die aktuellen Beiträge
Datum
Titel
04.11.2025 16:13:59
AddIn erstellen und mit Passwort schützen
04.11.2025 15:31:37
Die Summendifferenz zwischen 01.01. und heute berechnen
04.11.2025 13:05:47
Frage Bed.Format mit Reihenfolge
04.11.2025 11:17:34
Datumsberechnung Konfirmation
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
1232to1236
1232to1236
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

2 Autofilter mit VBA & Checkboxen

Forumthread: 2 Autofilter mit VBA & Checkboxen

2 Autofilter mit VBA & Checkboxen
Tobi
Hallo xls.-Cracks,
ich habe folgendes Problem: Per Makro & Checkboxen möchte ich eine Liste nach einem bestimmten Kriterium (per Checkbox wählbar) in einer bestimmtem Spalte filtern lassen (z.B. Spalte C - Monat) - mit dem enthaltenen Makro (von Sepp!) funktioniert das auch ganz gut ; jetzt möchte ich aber noch nach einem anderen Kriterium (wieder per Checkbox wählbar) in einer anderen Spalte filtern (z.B. Spalte A - Gebiet)!

Die Datei https://www.herber.de/bbs/user/76934.xlsm wurde aus Datenschutzgründen gelöscht


Leider habe ich keine Ahnung, wie ich dazu die Makro umbauen soll!! Könnt ihr mir helfen?
Vielen Dank schon im Voraus!
Gruss
Tobi
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
nicht umbauen nur ergänzen ...
10.10.2011 12:23:18
Matthias
Hallo
Einfach diesen Code ergänzen

Private Sub CheckBox6_Click()
setFilter2
End Sub


Private Sub CheckBox7_Click()
setFilter2
End Sub


Private Sub CheckBox8_Click()
setFilter2
End Sub


Private Sub CheckBox9_Click()
setFilter2
End Sub


Private Sub setFilter2()
Dim objOLE As OLEObject
Dim strFilter() As String
Dim lngIndex As Long
For Each objOLE In Me.OLEObjects
If TypeName(objOLE.Object) = "CheckBox" Then
If objOLE.Object.Value Then
ReDim Preserve strFilter(lngIndex)
strFilter(lngIndex) = objOLE.Object.Caption
lngIndex = lngIndex + 1
End If
End If
Next
If lngIndex > 0 Then
Me.Range("$A$1:$C$16").AutoFilter Field:=1, _
Criteria1:=strFilter, Operator:=xlFilterValues
Else
Me.Range("$A$1:$C$16").AutoFilter Field:=1
End If
End Sub
Gruß Matthias
Anzeige
AW: nicht umbauen nur ergänzen ...
10.10.2011 13:15:40
Tobi
Hallo Matthias,
recht herzlichen Dank für die schnelle Lösung - funktioniert prima!!
Eine Frage noch - wenn die Checkboxen auf einem anderen Sheet als die zu filternden Daten sind, wie wäre dann die Lösung?
Danke schonmal!
Gruss
AW: nicht umbauen nur ergänzen ...
10.10.2011 14:22:58
Tobi
Sorry, hatte vergessen, die Frage als "noch offen" zu markieren.
Anzeige
AW: nicht umbauen nur ergänzen ...
10.10.2011 14:27:02
Rudi
Hallo,
einfach auf das Sheet mit den Daten referenzieren.

  If lngIndex > 0 Then
Sheets("Daten").Range("$A$1:$C$16").AutoFilter Field:=1, _
Criteria1:=strFilter, Operator:=xlFilterValues
Else
Sheets("Daten").Range("$A$1:$C$16").AutoFilter Field:=1
End If

Gruß
Rudi
Anzeige
DANKE!!
10.10.2011 14:48:13
Tobi
Hallo Rudi - funktioniert 1A!! Recht herzlichen Dank!!
Gruss Tobi
;

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
VBA Klasse für alle CheckBoxen
enrico

Sehr geehrte Forum-Experten,
ich beschäftige mich seit einer Woche mit VBA.
Ich habe nun folgende Frage:
Wie kann ich für alle Checkboxen in einem Sheet den gleichen Code benutzen...
Am Beispiel:
Public Sub CheckBox_1_1_1_0_0_0_Click() If CheckBox_1_1_1_0_0_0.Value = True Th...
13.12.2009 17:35:45
Thread-ID: 1123606
6 Beiträge
VBA: diagramm nach Checkbox-Auswahl erstellen
Jonathan

Hallo liebe Experten,
ich stehe vor folgenden Problem:
In einem Excel-Sheet werden ca. 100 Arbeitsplätze verwaltet.
Jeder Arbeitsplatz hat in diesem Sheet eine Tabelle mit mit 8 Zeilen und 18 Spalten. Die Tabellen sind untereinander angeordnet.
Jede Tabelle (bzw. jeder Arbeitsp...
21.12.2009 15:47:14
Thread-ID: 1125372
4 Beiträge
Anzeige
Word-Vba mit F11 von Checkbox zu Checkbox
Checkbox

Hallo Wissende,
https://www.herber.de/bbs/user/68526.doc
ist an sich unnötig, da ist nur Beipieltext und drei Checkboxen (aus Steuerelementtoolbox) drin.
Mit F11 will ich, so wie wenn das Dokument geschützt ist mit TAB, von Checkbox zu Checkbox hüpfen, sodaß ich mit der Leertaste...
12.03.2010 12:50:36
Thread-ID: 1145366
6 Beiträge
Anzeige
VBA Excel Checkbox Klasse definieren
Kie

Hallo Forum,
ich möchte gerne 5000 Checkboxen in eine Excelzelle schreiben (Teil 1) und jede soll dann bei Aktivierung das gleiche Makro ausführen (Teil 2).
Teil 1 habe ich hinbekommen. Das Beispiel für 25 Checkboxen hänge ich unten an.
Bei Teil 2 bin ich ratlos. Da ich nicht jede C...
10.07.2012 09:23:33
Thread-ID: 1270360
9 Beiträge
Anzeige
VBA-Makro in anderer Mappe starten
Michael

Hallo ihr Helfer,
ich möchte mit den VBA-Makro aus Mappe 1 ein Makro aus Mappe 2 öffnen. Was muß ich vor den call-Befahl schreiben, damit es funktionert? ich habe schon versucht die andere Mappe zu aktivieren, aber dann kommt beim call aufruf immer der Fehler das Makro kann nicht gefunden we...
02.07.2002 16:42:29
Thread-ID: 133155
3 Beiträge
Anzeige
Outlook VBA: Wie Makro dynamisch starten?
frigo777

Hallo zusammen,
in den Outlook Foren gab es leider null response, daher mal ein Versuch bei den hiesigen Experten.
Ich möchte aus einem Makro andere Makros dynamisch starten. D.h. ich habe den Namen des zu startenden Makros in einer Variable. Wie kann ich dies in Outlook VBA tun? In Exc...
20.05.2014 22:15:58
Thread-ID: 1362558
6 Beiträge
VBA ausgewählte Tabelle als Pdf via Checkbox
Sino

Hallo Leute,
hoffe ihr könnt mir helfen. Ich würde gerne per Checkbox Tabellen einblenden und die auch per Buttom als PDF speichern. Die Seite mit den Checkboxen soll natürlich nicht gespeichert werden. Feste Tabellen wie Deckblatt und Bemerkung sollen immer gespeichert werden.
VG Sino...
14.11.2014 07:11:36
Thread-ID: 1392286
3 Beiträge
per VBA checkbox in Frame hinzufügen
Pete

Hey Leute,
ich bin dabei eine Userform über VBA automatisch mit Elementen zu befüllen. Dabei setze ich mehrere Frames, wobei ich mit den Angaben Top/Left super klar komme. Wenn ich allerdings eine CheckBox manuell in einen Frame hinzufüge, orientieren sich Top/Left an den Innenmaßen das Fra...
19.02.2015 11:08:10
Thread-ID: 1410363
2 Beiträge
Frage VBA // If Checkboxen Text verketten
Marius
Hallo,
leider verzweifel ich gerade an Excel (eher gesagt VBA). Kurz gesagt - ich bin ein Laie in VBA - insofern brauche ich mal Hilfe vom Profi.
Die Musterdatei ist hier abgelegt:
Die Datei https://www.herber.de/bbs/user/99059.xlsm wurde aus Datenschutzgründen gelöscht Mein Vorhaben:
24.07.2015 18:59:49
Thread-ID: 1438386
4 Beiträge
VBA makro starten bei Eingbe in anderer Tabelle
Marc

Hallo,
ich möchte in einem Arbeitsblatt (Tabelle6) folgendes Makro zum Ein-/ Ausblenden von Spalten (abhängig vom Zeileninhalt der Spalten)bei Eingabe eines Wertes in Zelle C5 von Tabelle1 starten.
------------ Sub ein_aus_blenden() Cells.Rows.Hidden = False For sp = 20 To 96 If Cells(1...
19.03.2016 00:22:05
Thread-ID: 1482942
5 Beiträge
VBA-CheckBox
Lukas

Ich habe eine Userform erstellt auf der immer eine unterschiedliche Anzahl an CheckBoxen ist. Es gibt einen Button, der alle aktivieren soll. Wie lautet der Code für diesen Button?
Lg Lukas
02.07.2016 20:31:33
Thread-ID: 1502245
7 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