Überlauf
28.07.2006 15:50:27
Xico
aus 52 Tabellen hole ich mir mit Hilfe von unten stehendem Code 12 Monatswerte. Bei den ersten 16 Tabellen wird alles ordendlich in die Zieltabelle geschrieben, ab der 17. gibt es einen Überlauf?!?
Heier mien Code (Anfänger-Sprache):
Sub RestRein()
Dim v, w%
For v = 5 To 2085 Step 40
For w = 5 To 16
Cells(v, w + 29).ClearContents
Cells(v, w + 29) = (Sheets((v - 5) / 40 + 3).Cells(9, w) _
+ Sheets((v - 5) / 40 + 3).Cells(12, w) - Sheets((v - 5) / 40 + 3).Cells(8, w)) _
/ (Sheets((v - 5) / 40 + 3).Cells(37, w) + Sheets((v - 5) / 40 + 3).Cells(38, w))
Next w
Next v
End Sub
Wer weis warum, bzw. kann ich dies einfacher haben?
Danke und Gruss
Xico