Office: Spalten miteinander multiplizieren

Hallo liebe Community,

ich habe ein Excelfile bei dem ich die Spalten M und N miteinander multiplizieren und anschließend durch 1000 teilen muss- das ganz soll dann in Spalte O stehen.
ich bekomme es per Code auch hin- ABER: es dauert ewig.

Hat jemand evtl eine intelligentere Lösung als meine?:

for h = 2 to i
Cells (h,15) = "=(RC[-2]*RC[-1]/1000"
Range("O:O").copy
Range("O:O").PasteSpecial xlPaste Values
Next h

Vielen Dank für eure Hilfe (sorry, ich weiß leider nicht wie ich den Code hier schöner posten könnte)

Besten Dank!
Grüße
Lea

:)

 

Hallo Lea,

versuche es mit

PHP:

         =summenprodukt(A1:a10;b1:b10)/1000


 

Hallo Fennek 11,

danke für die schnelle Reaktion.
Es müsste aber mit VBA sein...

Wie kann ich es da umsetzten? Hast du zufällig eine Idee?

Danke

 

Du kopierst ja auch (i - 1)* die komplette Spalte O! Wozu?

Entweder "Klappercode" OHNE Formel:
Code:

oder "in einem Rutsch":
Code:

Bei großem "i" nimm Variante 2

Grüße
EarlFred

 

Perfekt! Vielen Dank! Es funktioniert!

 

"funktioniert" hat es vorher doch auch, war nur langsam?

 

Ja. Das stimmt. Vielen Dank, dass gibt mir das Gefühl doch nicht ganz unfähig zu sein in VBA. Und es funktioniert nicht nur sondern ist auch richtig schön schnell.
Danke!