Macro hängt bei "Round"
08.06.2004 12:49:09
hariotfs
Hab folgende VBA-Code zur Errechnung der Mwst. erstellt:
Sub MwstErrechnen()
Dim Faktor As Single
Dim i As Long
Faktor = 1.16
For i = 1 To ActiveSheet.UsedRange.Rows.Count
Cells(i, 3).Value = Round(Cells(i, 2).Value * Faktor, 2)
Next i
End Sub
Macro bleibt bei "Round" stehen mit hinweis:
Sub oder
Function nicht definiert.
Arbeite mit Excel97.
Danke vorab für Hilfe hariotfs
Anzeige