ich will mehrer Formeln in Spalten eintragen lassen dafür habe ich die Folgende Schleife geschrieben. Beim Ausführen der Schleife läuft diese ohne Fehlermeldung durch. im Ergebnis steht in jeder Spalte an der richtigen stelle die Formel, jedoch wurden die Spaltenbuchstaben nicht in die Formel eingetragen =TEILERGEBNIS(9;8:50)!!!
Sub Gesamtsummen (LZ)
DIM x,xx,jj
x = Array(7, 9, 17, 19, 21, 23, 25, 10, 26)
xx = Array(G, I, Q, S, U, W, Y, J, Z)
jj = 0
For jj = 0 To 8 Step 1
Cells(LZ, x(jj)).Formula = "=TEILERGEBNIS(9;" & CStr(xx(jj)) & "8:" & CStr(xx(jj)) & LZ & ")"
Next jj
End Sub
Gibt es für den Buchstabdenbereich (xx) eine bessere Schreibweise, so das man vielleicht die Ziffern (x) für die Spalten nutzen kann????