注册 登录
编程论坛 VB6论坛

execl公式复制问题

ami1999 发布于 2016-07-28 10:37, 1359 次点击
一个多行execl表格,前10列数据是从其他文件中读取写入execl中,第11列开始为公式计算出的结果。
每天需要写几行数据,第11列开始有编辑好的公式。
xlSheet.Cells(r, 11).Formula = xlSheet.Cells(r - 1, 11).Formula

现在用上面这行代码,想复制公式到当前行。

运行结果:第一行(r)复制出,但计算是计算的(r-1)行数据。
          第二行(r+1)复制不出公式,是复制了(r)行的计算结果。

vb小白,请大神们帮助。
2 回复
#2
xiangyue05102016-07-28 13:55
换成FormulaR1C1试试
很少用公式的复制,既然都是VB/VBA了,直接写公式也不麻烦了么
#3
ami19992016-08-04 09:56
回复 2楼 xiangyue0510
感谢xiangyue0510,使用FormulaR1C1解决问题。
谢谢谢谢!
1