Wie könnte ich den G2-Wert in diesem Code zu simulieren, dass es in Excel gezogen wird, wie von jetzt nur die Formel Test G2 für die in jeder Reihe wird eingefügt in denen der Code I-Test eher nach jeder Zeile, dh G2, G3, G4, G5 .. (nur Spalte G)Excel VBA cell.Formula für jede Zeile in einer Spalte (als Wenn ich die Formel nach unten gezogen)
LASTROW2 = Range("J" & Rows.Count).End(xlUp).Row
Set rng2 = Range("J2:J" & LASTROW2)
For Each cell In rng2
cell.FormulaR1C1 = "=VLOOKUP(RC[-3],$G:$I,2,FALSE)/VLOOKUP(RC[-8],$A:$C,2,FALSE)"
Next cell
Augenblick erhalte ich ein application defined error
mit der cell.FormulaR1C1 und ich haben nie einen dieser Fehlercodes vor
Ich glaube, Sie sind für die 'FillDown' Methode suchen: http://stackoverflow.com/questions/22104743/excel-vba-autofill-multiple-cells-with-formulas – RGA
Sie die gesamte machen müssen Formel 'R1C1' Notation. Auch gibt es keine Notwendigkeit für eine Schleife, können Sie direkt in Rng2 schreiben. –
FWIW, Sie können auch A1-Verweise verwenden: 'rng2.Formula =" = SVERWEIS (G2, $ G: $ I, 2, FALSCH)/SVERWEIS (B2, $ A: $ C, 2, FALSCH) "' – Rory