Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Blattauswahl nach ListBox-Selektion

Gruppe

ListBox

Problem

Bei Auswahl eines ListBox-Elementes wird das entsprechende Tabellenblatt ausgewählt. Die Blattnamen werden bei Aktivieren des Blattes neu eingelesen.

Lösung
Geben Sie den Ereigniscode in das Klassenmodul des Arbeitsblattes ein.

ClassModule: Tabelle1

Private Sub lstWks_Click()
   Worksheets(lstWks.Value).Select
End Sub

Private Sub Worksheet_Activate()
   Dim wks As Worksheet
   lstWks.Clear
   For Each wks In Worksheets
      If wks.Name <> "Tabelle1" Then
         lstWks.AddItem wks.Name
      End If
   Next wks
End Sub