Gruppe
Dialog
Problem
Wie kann ich bei Drücken einer Schaltfläche den Wert aus der 2. Spalte einer UserForm-ComboBox berechnen?
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