Question

为什么用宏出现类Range的Select方法无效 ， 应该这么改

Answer 1

不要用ActiveCell.FormulaR1C1;

要用Selection.FormulaR1C1=公式

或者这样
With Selection
.FormulaR1C1=公式

End With

Answer 2

直接
range("E4").formulaR1C1="公式"
不就行了，
为啥要选择再对选中操作呢？这样还会降低执行效率。