问下在VBA中如何自动填充计算列
问下在VBA中怎么自动填充计算列
表中有 隐藏列E 使E列的值等于A列和B列的平均值
代码运行的时候自动给E列除标题行 E1 从E2开始的所有行 自动计算填充值。
------解决方案--------------------
表中有 隐藏列E 使E列的值等于A列和B列的平均值
代码运行的时候自动给E列除标题行 E1 从E2开始的所有行 自动计算填充值。
------解决方案--------------------
Sub Macro1()
Range("E1").FormulaR1C1 = "=(RC[-4]+RC[-3])/2"
Range("E1").Select
Selection.AutoFill Destination:=Range("E1:E3"), Type:=xlFillDefault
End Sub