セルを丸めてVBAを自動入力する

Question

セルAR8では、この方程式を挿入するマクロを探しています。 "ROUND（IF（AP8>（AN8 * P8）、AP8、AN8 * P8）、2）それを次の800-1000行の列の下に記入してください。

Answer 1

これは、開始に役立ちます。
Range.Formula property on MSDN
Range.AutoFill method on MSDN

With Activesheet.Range("AR8") 
    .Formula = "=ROUND(IF(AP8>(AN8*P8),AP8,AN8*P8),2)" 
    .AutoFill Destination:=.Resize(100), Type:=xlFillDefault 
End With