Excel公式到VBA代码转换
我正在尝试创build一个macros，允许我扫描列和数据行并将公式插入空白单元格。 我可以用下面的excel公式完成这个任务：
=IF(ISBLANK(W4),((IFERROR(DATEDIF(MAX($P4,DATE(2016,5,1)),MIN($Q4,DATE(2016,8,1)),"d"),0)/(DATEDIF(P4,Q4,"d")))*$T4),W4) 我的问题是，是否有一种方法，我可以把这个vba代码，以便我可以运行一个macros，将自动应用这个公式在我的excel工作表跨30行的列？ 因此，下一行将会是：
=IF(ISBLANK(W5),((IFERROR(DATEDIF(MAX($P5,DATE(2016,5,1)),MIN($Q5,DATE(2016,8,1)),"d"),0)/(DATEDIF(P5,Q5,"d")))*$T5),W5)
先谢谢您的帮助！
您可以使用
Range("RangeToCopyFormulaTo").Formula = Range("CellToCopyFormulaFrom").Formula
Excel将负责更新单元格引用，与复制/粘贴时相同