rechenoperatoren dynamisch zuordnen
05.08.2003 17:06:11
Frank R
Ich möchte die Operatoren + - / * über eine
for-Schleife dynamisch zuordnen
und die Ergebnisse dynamisch in den Zellen
ausgeben lassen, leider gibt er nur Strings aus.
Wie bekomme ich den Rechner dazu,
das er das ausrechnet?
Sub Dyn()
Dim operat(4) As Variant
Dim Zahl(9), Ergeb As Variant
operat(1) = "-"
operat(2) = "+"
operat(3) = "/"
operat(4) = "*"
For i = 1 To 4
operat(i) = operat(i)
Ergeb= 10 & operat(i)
cells(i,1).Activate
Activecell= Ergeb
next i
End Sub