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

ComboBox auf Tabelle mit Filtern

Forumthread: ComboBox auf Tabelle mit Filtern

ComboBox auf Tabelle mit Filtern
28.01.2024 11:07:42
norbert
Guten Morgen,
habe festgestellt, das ich nochmal eine Unterstützung benötige.
Habe eine ComboBox über die Spalte D (4) gesetzt.
Ich möchte mit der ComboBox die Namen in der Spalte D filtern, angefangen ab Zeile 3.

gruß norbert
Anzeige

12
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: ComboBox auf Tabelle mit Filtern
28.01.2024 12:01:11
ralf_b
geht's nicht etwas kürzer? Hier zu erraten was du genau willst ist noch viel zu leicht.

ich versuchs mal.
du willst bei Änderung der Combobox eine Filterung der zu Grunde liegenden Tabellenspalte erreichen. 



Dim bol  'Das hier oben ins Userform Modul



Private Sub ComboBox1_Change()  

   If bol Then Exit Sub

   If ComboBox1.Value = "" Then Exit Sub

   bol = True

   Tabelle2.Range("D3").AutoFilter

   Tabelle2.Range("D3").AutoFilter Field:=1, Criteria1:=ComboBox1.Value

   bol = False

  End With

End Sub

Anzeige
AW: ComboBox auf Tabelle mit Filtern
28.01.2024 12:08:13
norbert
Guten Morgen ralf,
danke, die ComboBox liegt aber auf der Tabelle.

gruß norbert
AW: ComboBox auf Tabelle mit Filtern
28.01.2024 12:14:05
norbert
Hallo ralf b,
ich habe mal aufgezeichnet.
Habe erst Filter gesetzt.
ActiveSheet.Range("$A$2:$R$26").AutoFilter Field:=1, Criteria1:= _
"Macoja GmbH"
ActiveSheet.Range("$A$2:$R$26").AutoFilter Field:=4, Criteria1:="Schmidt"


gruß norbert
Anzeige
AW: Hallo anbei mein Muster
28.01.2024 18:14:29
ralf_b
wenn ich das richtig sehe, dann benötigst du eine Lösung für abhängige Dropdowns, da sich die beiden Filter gegenseitig beeinflussen.
Anzeige
AW: Hallo anbei mein Muster
28.01.2024 18:56:57
norbert
Hallo Ralf,
ich habe nicht so viel Ahnung, wie vor schon geschrieben.
Würde mich für ein Beispiel im Voraus bedanken,
Gruß Norbert
AW: ComboBox auf Tabelle mit Filtern
28.01.2024 12:11:25
ralf_b
und welche Art ist die Combobox? ActiveX oder Formularsteuerelement?
Combobox = ActiveX
28.01.2024 13:35:06
norbert
Anzeige
AW: Combobox = ActiveX
28.01.2024 13:49:59
ralf_b
dann sollte der Code auch passen. bis auf das "end with". Das muß noch weg. Und die Datenbereiche für den Filter anpassen.
Leider keine Reaktion
28.01.2024 14:22:05
norbert
Hallo Ralf,
habe es so in die Tabelle reingesetzt: 
Private Sub ComboBox1_Change()

Dim bol  'Das hier oben ins Userform Modul

   If bol Then Exit Sub

   If ComboBox1.Value = "" Then Exit Sub

   bol = True

   ActiveSheet.Range("D3").AutoFilter

   ActiveSheet.Range("D3").AutoFilter Field:=1, Criteria1:=ComboBox1.Value

   bol = False

End Sub


ich möchte ja in der Spalte D die Namen auswählen können aber
beim anklicken der ComboBox keine Reaktion.

mfg norbert
Anzeige
AW: Leider keine Reaktion
28.01.2024 14:36:55
ralf_b
ich hatte es schon mal angedeutet. Nun im Klartext. Wenn du denkst du könntest hier ohne gewisse Grundlagenkenntnisse Code einfach mal übernehmen und selbst anpassen, dann ist dies ein Irrglaube. Du musst mehr Details preisgeben.
Hast du der Combobox den Wertebereich zugeordnet? rechte MAustaste-- Eigenschaften - Listfill-Range ausfüllen. analog zu Rowsource.
Heisst deine Combobox auch Combobox1 ???
Der Code gehört in das Codemodul des Tabellenblattes.
Das dim bol gehört nicht "in" das Change_Event Makro, sondern in das umgebende Codemodul ganz oben. Besser du schreibst es gleich so Dim bol as Boolean
Field ist die Spaltennummer gezählt von Anfang des zusammengehörigen Datenbereiches.
d.h. sind um Spalte D herum noch mehr Daten, dann vom linken Rand aus zählen.


Anzeige
Sorry ralf_b...
28.01.2024 15:04:00
norbert
Hallo Ralf,
Du hast leider RECHT aber ich bin schon die ganze Zeit dran und versuche alles zu verstehen, klappt noch nicht,
bin so lange noch nicht dabei mit VB.
Habe das gemacht wie Du beschrieben hast, klappt auch, allerdings ein kleines Hindernis.
Wenn ich in der Spalte A mit der ComboxBox2 den Namen auswähle, und dann in der Spalte D den KundenNamen
auswähle, wird die Spalte A wieder zurückgesetzt und die Spalte 4 hat nur Gültigkeit.
Wie kann man dies verhindern ? 

Dim bol As Boolean



Private Sub ComboBox1_Change()

   If bol Then Exit Sub

   If ComboBox1.Value = "" Then Exit Sub

   bol = True

   ActiveSheet.Range("D3").AutoFilter

   ActiveSheet.Range("D3").AutoFilter Field:=4, Criteria1:=ComboBox1.Value

   bol = False

End Sub



 Private Sub ComboBox2_Change()

   If bol Then Exit Sub

   If ComboBox2.Value = "" Then Exit Sub

   bol = True

   ActiveSheet.Range("a3").AutoFilter

   ActiveSheet.Range("a3").AutoFilter Field:=1, Criteria1:=ComboBox2.Value

   bol = False

End Sub


Danke für die Erklärung !

gruß norbert
Anzeige

Forumthreads zu verwandten Themen

Tabelle nach Anfangs und Enddatum filtern
Thomas

Hallo zusammen,
ich habe eine Frage, wie kann ich per VBA eine Tabelle nach Anfangs- und Enddatum filtern?
Vielen Dank im Voraus
Thomas
23.09.2008 09:50:53
Thread-ID: 1011635
5 Beiträge
Summe der Werte nach auswahl Filter
Jonathan

Hallo erneut!
Habe noch eine Frage:
Wenn ich eine Tabelle via Filter selektiere, möchte ich auch nur die Summe der Spalte C aller angezeigten Werte haben. Ist dies ohne VBA möglich?
Vielen Dank und Grüße
Jonathan
04.11.2008 11:52:11
Thread-ID: 1021548
6 Beiträge
Summe berechnen mit einer Matrixformel
Sibylle

Hallo,
kann man die Summe der Nettobeträge mit einer Matrixformel ermitteln.
Wenn ja, wie muss diese dann aussehen?
Besten Dank im voraus.
Gruß
Sibylle

11.11.2008 10:18:00
Thread-ID: 1023446
12 Beiträge
Schleife soll Tage zählen und Summe bilden
WolfgangN

Hallo,
ich habe 2 Tabellen, eine für 2008 ist ausgefüllt, die 2. für 2009 wird ständig erweitert.
Jetzt möchte ich in einer Zelle in Tabelle1 den Wert aus Tabelle2 geschrieben haben, der sich so ergibt. Bsp.:
Die Anzahl der Tage in Tabelle1 beträgt 12. Die Summe der Werte dieser Ta...
16.01.2009 10:46:00
Thread-ID: 1040467
3 Beiträge
Anzeige
Kriterien finden und Summe bilden
Claudia

Hallo liebe Community,
nachdem ich mich schon seit gestern mit meinem Problem rumschlage suche ich nun die Hilfe der Profis.
Folgendes:
In Spalte D stehen 4 versch. Werte - "offen", "erledigt", "verworfen", oder "nicht komplett"
In Spalte E Steht ein beliebiger Betrag (als Währu...
20.03.2009 10:51:23
Thread-ID: 1062086
6 Beiträge
summe nach Filterung bilden
Frank

Moin,
nach einer Autofilterung möchte ich die Summe einer Spalte bilden. Durch die Filterung wird jedoch die Summenzeile mit weggefiltert.
Ich habe nun mit folgendem Makro eine Summe unter die letzte Zeile nach Filterung gebildet.
Range ("a7").select
Activecell.end(xldown).sel...
21.04.2009 12:25:39
Thread-ID: 1070018
3 Beiträge
Tabelle nach einem text filtern.
Mattes

Hallo,
muß leider nochmal die Frage stellen, wie ich eine Tabelle nach einem Text filter, habe dazu schon mal den Spezialfilter probiert aber das Ergebnis war nicht zufrieden stellen.
Tabelle besteht aus den Spalten A bis P, Länge der Tabelle unterschiedlich da neue Datensaätze dazu kom...
26.10.2009 12:21:29
Thread-ID: 1112168
2 Beiträge
Anzeige
Daten aus Tabelle nach Suchkriterium filtern
Kälberer

Hallo zusammen,
ich habe eine Tabelle mit 16 Spalten. Diese werden aus einem Eingabeformular heraus eingegeben.
Es handelt sich hier um alle Beanstandungen aller Lieferanten, die wir im Jahr bekommen. Folglich sind für die einzelnen Lieferanten immer die gleichen Kriterien in eben diese...
27.10.2009 10:40:15
Thread-ID: 1112411
2 Beiträge
Daten aus Tabelle nach Suchkriterium filtern
Kälberer

Hallo zusammen,
ich habe eine Tabelle mit 16 Spalten. Diese werden aus einem Eingabeformular heraus eingegeben.
Es handelt sich hier um alle Beanstandungen aller Lieferanten, die wir im Jahr bekommen. Folglich sind für die einzelnen Lieferanten immer die gleichen Kriterien in eben diese...
27.10.2009 10:41:33
Thread-ID: 1112416
2 Beiträge
Summe aus Werten, wenn mehrere Bedingungen vorgege | Herbers Excel-Forum
Joerschi
Hallo liebes Forum,
ich suche eine bestimmte Excel-Funktion, finde sie aber nicht :-(.
Und zwar sollen in einer groooßen Tabelle in Spalte A alle diejenigen Werte summiert werden, welche verschiedene Bedingungen aus anderen Spalten erfüllen.
Als Beispiel habe ich die Problematik an Zahl...
25.01.2010 20:15:08
Thread-ID: 1132828
6 Beiträge
summen abhängig von grösse...
grösse...

Hallo,
wieder ein schwieriges Problem: Ich habe einen Zellbereich (eine Zeile), in dem immer abwechselnd eine Anzahl und ein Betrag steht. Ich möchte nun aus diesen Werten eine Gesamtsumme berechnen, will dabei aber nur die Wert-Paare berücksichtigen, bei denen der Betrag über 25,- liegt.<...
06.02.2010 19:28:00
Thread-ID: 1136452
6 Beiträge
Tage eines Monats suchen und die Summe bilden
Eva-Maria

Hallo zusammen,
Vielleicht hat jemand zeit und kann mir helfen, trotz WM ;o)
Damit ich meine Gutscheine unter kontrolle habe benötige ich die Summe vom Monat Jan, Feb......
Ich trage das Datum ein an dem ich einen Gutschein verkaufe. Die Gutscheine sind für drei Möglichkeiten untert...
21.06.2010 23:28:45
Thread-ID: 1163292
15 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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