Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

ListBox-Auswahl in Labels übernehmen

Gruppe

ListBox

Problem

Wie kann ich die Auswahl aus einer UserForm-ListBox in Labels der UserForm übernehmen?

Lösung
Geben Sie den nachfolgenden Code in das Klassenmodul der UserForm ein.

ClassModule: frmWertAusListbox

Private Sub CommandButton1_Click()
  Unload Me
End Sub

Private Sub ListBox1_Change()
  Label1 = ListBox1.Value
  Label2 = Cells(ListBox1.ListIndex + 2, 2)
End Sub

StandardModule: basMain

Sub CallForm()
   frmWertAusListbox.Show
End Sub