Zellbezug bei Formel in Schleife in Excel-VBA

Ich versuche mein makro eine Formel in eine bestimmte Zelle, deren Zellbezüge definiert durch eine Schleife und die Reichweite der Formel-Daten (für STABW.P) ist, basierend auf dem Fortschritt der Schleife. Der code, den ich bisher gemacht haben ist in der Lage, um eine Zeile einfügen wo ich möchte, dass die STABW Hinzugefügt, geben Sie den text "StdDev" in Zelle A(x), und wählen Sie dann jede Zelle in der neuen Zeile (Erhöhung der Spalte). Der code ist unten dargestellt:

firstCell = 2
lastCell = 2
initialValue = 84
stepSize = 5
lastRow = Range("A1").End(xlDown).Row
lastColumn = Range("A1").End(xlToRight).Column
For x = 2 To lastRow
    cellDifference = Range("B" & (x)).Value - initialValue
    If Abs(cellDifference) > 1 Then
        lastCell = x - 1
        Range("B" & (x)).EntireRow.Insert
        Range("A" & (x)) = "StdDev"
        For y = 2 To lastColumn
            Cells(x, y).Select
        Next y
        x = x + 1
        firstCell = x
        initialValue = initialValue + stepSize
    End If
Next x

Ich habe versucht, folgenden code verwenden:

Cells(x, y) = "=STDEV.P(" & Cells(firstCell, y) & ":" & Cells(lastCell, y) & ")"

Aber dies gab die Fehlermeldung "Application-defined or object-defined error". Ich muss wissen, wie die Eingabe der zellreferenz Wert in die Formel ein, aber Sie haben einen dynamischen Bereich, der abhängig von der Schleife.

Jede Hilfe zu diesem wäre gerne geschätzt. Danke.

Schreibe einen Kommentar