Moin
Brauche eure Hilfe.
Bei diesen Code macht Excel 2016 einen Laufzeitfehler 9 (13) unter Excel 2010 gibt es keine Fehler.
Dim mw(250)
Dim mz(250)
Dim mi(250)
v = 0
For i = 13 To 250 'Startpunkt
mw(v) = CInt(Worksheets("Daten").Range(Cells(4, i), Cells(4, i)).Value)
mz(v) = CInt(Worksheets("Daten").Range(Cells(3, i), Cells(3, i)).Value)
mi(v) = CInt(Worksheets("Daten").Range(Cells(2, i), Cells(2, i)).Value)
v = v + 1
Next i
Was Übersehe ich da?
LG Mike
|