求VBA的计算公式

题目

求VBA的计算公式
ActiveCell.FormulaR1C1 = "=COUNTA(" & CStr(ActiveSheet.Range("H" + CStr(i + 1)).Value) & CStr(StartRow) & ":" & CStr(ActiveSheet.Range("H" + CStr(i + 1)).Value) & CStr(i) & ")"

上面的公式,当i=10,StartRow=2,H列的值是P时,就是要计算P2到P10的行数,
可是输出之后,变成了=COUNTA('P2':'P10')
这样子,值永远＝1
请高手帮忙.
谢谢

答案

你的Formula属性用错了,不是FormulaR1C1,这是R1C1引用格式,不能识别“A1”引用应该直接用 Formula属性就行了：ActiveCell.Formula = "=COUNTA(" & CStr(ActiveSheet.Range("H" + CStr(i + 1)).Value) & CStr(StartRo...

举一反三

已知函数f（x）=x，g（x）=alnx，a∈R．若曲线y=f（x）与曲线y=g（x）相交，且在交点处有相同的切线，求a的值和该切线方程．

查看答案

我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好

查看答案

奥巴马演讲不用看稿子.为什么中国领导演讲要看?

查看答案

想找英语初三上学期的首字母填空练习……

查看答案

英语翻译

查看答案