Differenz bilden
18.10.2007 17:18:56
Roman
ich hab noch eine Frage: warum kommt bei mir ein Fehler, wenn ich die Differenz einer Zahlenreihe errechnen will?
Sub Durchlaufzeiten()
Dim Intervall(1 To 8000)
Dim i As Integer
With Worksheets("Tabelle1")
For i = 1 To 8000
Intervall(i) = DateDiff("d", CDate(.Cells(i, 18)), CDate(.Cells(i, 7)))
Next i
End With
End Sub
Gruß, Roman
Anzeige