Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema ListBox
BildScreenshot zu ListBox ListBox-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema ToggleButton
BildScreenshot zu ToggleButton ToggleButton-Seite mit Beispielarbeitsmappe aufrufen

In ListBox nur gefilterte Zeilen Anzeigen lasse

Betrifft: In ListBox nur gefilterte Zeilen Anzeigen lasse von: Vulferin
Geschrieben am: 24.07.2014 20:01:30

Hallo zusammen

ich hab folgenen Code imgebrauch

'In dieser Routine laden wir alle vorhandenen
'Eintr_ge in die ListBox1
ListBox1.Clear 'Zuerst einmal die Liste leeren

lZeile = 2 'Start in Zeile 2, Zeile 1 sind ja die †berschriften
'Schleife solange etwas in der ersten Spalte in Tabelle 1 drin steht
Do While Trim(CStr(Tabelle1.Cells(lZeile, 1).Value)) <> ""

'Aktuelle Zeile in die ListBox eintragen
ListBox1.AddItem Trim(CStr(Tabelle1.Cells(lZeile, 1).Value))

lZeile = lZeile + 1 'N_chste Zeile bearbeiten

Loop

er soll mir aber nur angezeigte zeilen zeigen
ich filter vorher mit
ActiveSheet.Range("$B$1:$T$5").AutoFilter Field:=13, Criteria1:="<>" zeilen Filter
aber irgendwie zeigt er mir alle Zeilen

  

Betrifft: AW: In ListBox nur gefilterte Zeilen Anzeigen lasse von: Beverly
Geschrieben am: 24.07.2014 20:07:52

Hi,


versuche es so (ungetestet):

If Tabelle1.Rows(lZeile).Hidden = False Then ListBox1.AddItem Trim(CStr(Tabelle1.Cells(lZeile, 1).Value))

GrußformelBeverly's Excel - Inn


  

Betrifft: AW: In ListBox nur gefilterte Zeilen Anzeigen lasse von: Vulferin
Geschrieben am: 24.07.2014 20:43:04

Hi das Klappt wunderbar

1 Fragen
Ich hab mir einen Button gemacht
wenn ich Ihn Anklicke filter er mir was ich will

kann man das so machen
wenn ich nochmal auf Ihn klicke das er den Filter wieder wegnimmt ?


  

Betrifft: AW: In ListBox nur gefilterte Zeilen Anzeigen lasse von: Beverly
Geschrieben am: 24.07.2014 20:57:15

Hi,

benutze einen ToggleButton.


GrußformelBeverly's Excel - Inn


  

Betrifft: AW: In ListBox nur gefilterte Zeilen Anzeigen lasse von: Vulferin
Geschrieben am: 24.07.2014 21:21:34

Habs danke :)
Jetzt noch eine Frage ich glaube dann hab ich meine Liste fertig
Ich hab inSpalte K ein Datum stehen
und würde diese gerne Filten
und zwar 14 Tage vor dem Datum was dort eingetragen ist oder alles was nach dem datum ist.

Danach kommt nur noch eine suche mit eingabe feld
geht sowas ?


  

Betrifft: AW: In ListBox nur gefilterte Zeilen Anzeigen lasse von: Vulferin
Geschrieben am: 24.07.2014 21:25:39

in der normalen Tabelle hatte ich als Bedingte formatierung
=($K1-HEUTE()<14)*($K1>0)
aber das geht ja in vba so nicht


 

Beiträge aus den Excel-Beispielen zum Thema "In ListBox nur gefilterte Zeilen Anzeigen lasse"