VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Blattauswahl über eine UserForm-ComboBox

Gruppe

Dialog

Bereich

ComboBox

Thema

Blattauswahl über eine UserForm-ComboBox

Problem

Die Blattauswahl soll über eine UserForm-ComboBox erfolgen.

Lösung

Aufruf der UserForm über ShortCut STRG+a




ClassModule: frmSelect

Private Sub cboSheets_Change()
   Worksheets(cboSheets.Value).Select
   Unload Me
End Sub

Private Sub UserForm_Initialize()
   Dim wks As Worksheet
   For Each wks In ThisWorkbook.Worksheets
      cboSheets.AddItem wks.Name
   Next wks
End Sub

StandardModule: basMain

Sub DialogAufruf()
   frmSelect.Show
End Sub

    


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