VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Gefilterte Daten in eine ListBox einlesen

Gruppe

Dialog

Bereich

ListBox

Thema

Gefilterte Daten in eine ListBox einlesen

Problem

Wie kann ich erreichen, dass nach jedem Filtervorgang die gefilterten Daten in eine ListBox eingelesen werden?

Lösung

Geben Sie den Ereigniscode in das Klassenmodul des Arbeitsblattes ein.




ClassModule: Tabelle2

Private Sub Worksheet_Calculate()
   Dim iCounter As Integer
   lstFilter.Clear
   For iCounter = 2 To WorksheetFunction.CountA(Columns(1))
      If Rows(iCounter).Hidden = False Then
         lstFilter.AddItem Cells(iCounter, 1).Value
      End If
   Next iCounter
End Sub

    


Beiträge aus dem Excel-Forum zu den Themen VBE und ListBox