圆形单元格然后自动填充VBA

Question

在单元格AR8中，我正在寻找一个宏，它将插入此公式“= ROUND（IF（AP8>（AN8 * P8），AP8，AN8 * P8），2）”then auto将其填入下面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