Gruppe
Dialog
Problem
Bei Auswahl eines ListBox-Elementes wird das entsprechende Tabellenblatt ausgewählt. Die Blattnamen werden bei Aktivieren des Blattes neu eingelesen.
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