Hallo Gabi,
erstmal vielen Dank. Natürlich der fehler der sich ergibt, entsteht weil die bedingung immer erfüllt ist und somit auch beim ersten wert.
aber wieso?
In der Spalte 11 Stehen werte von von -200 bis 200. Wenn der wert jetzt 40 ist. Cells(49/3)
Dann müsste er doch in einerschritten hoch wandern und bei 41 >= 40 stoppen. (o sei dann 800)
Im folgenden müsste er doch dann o einsetzten und für die anderen spalten die entsprechenden Werte einsetzen.
Sheets( "OverviewX" ).Cells(6, 4).Value = Sheets( "Calculus" ).Cells(800, 6).Value
Sheets( "OverviewX" ).Cells(6, 9).Value = Sheets( "Calculus" ).Cells(60, 3).Value
oder habe ich da was flasch gemacht und vba übernimmt den wert nicht?
ganz liebe Grüße
Ole
|