Runden auf 0 Stellen per VBA--Code stimmt nicht
14.12.2004 09:14:36
Peter
mit unten stehendem Code möchte ich, dass diese Beispielrechnung
auf 0 Stellen gerundet wird...aber da bräuchte ich kurze Hilfe....
Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
Sheets("Start").Range("A1").Value = (Round(2,5121 * 0,98742);0)
Else: Sheets("Start").Range("A1").Value = (round([D60] * [D59];0)
End If
End Sub
Weiß jemand die richtige Lösung
Vielen Dank
Peter S.
Anzeige