Select Case richtigstellen
Lorenz
Hab schon einige Varianten erfolglos probiert
Laut untenstehenden Code liefert LoProzent leider immer Null (Egal welcher optionsButton gewählt ist).
Aufgabe: Ist einer der vier Optionsbutton in UF gewählt, so soll der jeweilige Wert weitergegeben werden.
Dim LoProzent as Long
Select Case LoProzent
Case frmEingabe.opt_25 = True
25
Case frmEingabe.opt_50 = True
50
Case frmEingabe.opt_75 = True
75
Case frmEingabe.opt_100 = True
100
End Select
Cells(1,1)=LoProzent
Weiss vieleicht jemand Abhilfe?
Gruss
Lorenz