Irgendwas stimmt da noch nicht.
Wenn ich in der Tabelle "Auswertung" bin wird die Formel richtig eingetragen.
Wenn ich eine andere Tabelle aktiv ist, erhalte ich einen Fehler
Ansprechen will ich die Tabelle "Auswertung und den Range, der sich aus den Variablen zOben, zUnten und i (alles Long Variablen) ergibt.
Irgendwas muss da wohl noch jeweils vor Cells stehen, aber was?
Gruss, Peter
With Sheets("Auswertung").Range(Cells(zOben, i), Cells(zUnten, i))
.FormulaR1C1 = sFormel
.Calculate
.Value = .Value
.NumberFormat = "#,##0"
End With