Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.04.2024 23:30:16
Anzahl Jahre Zählen aus Datumreihe
16.04.2024 19:22:16
Von exceltabelle in word per steuerelement temarker
16.04.2024 18:50:53
Fehlermeldung bei Code - Excel speichern mit Bez. aus Zelle
16.04.2024 17:18:01
Projektplan-Tabelle oder Gantt ohne Balken
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
864to868
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
864to868
864to868
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Gefilterte Combobox

Gefilterte Combobox
25.04.2007 08:37:19
Rudi
Hallo liebe Forum-User,
folgendes Problem beschäftigt mich und bin auf eure Hilfe angewiesen. Ich habe eine Tabelle die ich in einer Userform Combobox anzeige um diese dann zur Bearbeitung auszuwählen. Passt soweit. Problem ist wenn die Tabelle mit einem Autofilter dargestellt wird, jetzt sollen in der Combobox nur mehr die gefilterten Daten aus der Tabelle dargestellt werden.
Danke für eure Hilfe
Rudolf

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Gefilterte Combobox
25.04.2007 09:12:06
Oberschlumpf
Hi Rudolf
Versuch es mal so (ungetestet):

Sub Filter()
Dim loZeile As Long
For loZeile = 1 To Cells(Rows.Count, 1).End(xlUp).Row
If Rows(loZeile & ":" & loZeile).EntireRow.Hidden = False Then
UserForm1.ComboBox1.AddItem Range("deine spalte" & loZeile).Value
End If
Next
End Sub


Bei aktiviertem Autofilter werden die Zeilen, die nicht in den Filter "passen" ausgeblendet.
Mein Code prüft in der Zeile
If Rows(loZeile & ...
ob die Zeile ausgeblendet ist oder nicht.
Wenn nicht, werden die Werte, die du willst ("Deine Spalte") der ComboBox hinzugefügt.
Du musst den Code natürlich anpassen, weil ich "deine Spalte" nicht kenne und weil ich auch nicht weiß, ob dein UF Userform1 und die CB ComboBox1 heißt.
Konnte ich helfen?
Ciao
Thorsten
Mein Code bezieht sich aufs aktive Tabellenblatt und Spalte A und beginnt in der ersten Zeile.
Bei Bedarf musst du anpassen.

Anzeige

Links zu Excel-Dialogen

ComboBox UserForm

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige