VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Wert aus 2. UserForm-ComboBox-Spalte berechnen

Gruppe

Dialog

Bereich

ComboBox

Thema

Wert aus 2. UserForm-ComboBox-Spalte berechnen

Problem

Wie kann ich bei Drücken einer Schaltfläche den Wert aus der 2. Spalte einer UserForm-ComboBox berechnen?

Lösung

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




ClassModule: frmSecondValue

Private Sub cmdCalculate_Click()
   Dim iCounter As Integer
   iCounter = 45
   MsgBox "Ausgewählter Wert * " & _
      iCounter & ": " & cboValues.Value * iCounter
End Sub

Private Sub UserForm_Initialize()
   cboValues.List = Range("A1:B12").Value
   cboValues.ListIndex = 0
End Sub

Private Sub cmdContinue_Click()
   Unload Me
End Sub

StandardModule: basMain

Sub CallForm()
   frmSecondValue.Show
End Sub

    


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