Private Sub UserForm_Initialize()
With ComboBox1
.AddItem "+"
.AddItem "-"
.AddItem "*"
.AddItem "/"
End With
End Sub
Code eingefügt mit Syntaxhighlighter 1.16
Und im _Change - Ereignis dieser Combo führste die Rechnungen aus.
Hoffnung trügt.

geschrieben von Ahlers , 19.02.2006, 14:52 Uhr , 64 mal gelesen