VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

In einer ComboBox selektiertes Arbeitsblatt auswählen

Gruppe

Dialog

Bereich

ComboBox

Thema

In einer ComboBox selektiertes Arbeitsblatt auswählen

Problem

Wie kann ich über ein sich in einem Tabellenblatt befindenden DropDown-Feld ein Arbeitsblatt auswählen?

Lösung

Geben Sie den Ereigniscode in das Klassenmodul des Arbeitsblattes ein.




ClassModule: Tabelle2

Private Sub cmdNewSheets_Click()
   Dim iSheet As Integer
   ComboBox1.Clear
   For iSheet = 1 To 12
      Worksheets.Add after:=Worksheets(Worksheets.Count)
      ActiveSheet.Name = Format(DateSerial(1, iSheet, 1), "mmmm")
      ComboBox1.AddItem ActiveSheet.Name
   Next iSheet
   ComboBox1.ListIndex = 0
End Sub

Private Sub ComboBox1_Change()
   Worksheets(ComboBox1.Value).Select
End Sub

    


Beiträge aus dem Excel-Forum zu den Themen Dialog und ComboBox