作者sagwow (不是我)
看板Office
标题[算表] VBA回圈横向(向右)代公式
时间Thu Oct 31 23:36:07 2019
软体:Office
版本:
标题有点难理解,举个例子。
A B C
1 1 4 =SUM(A1:B1)
2 2 5 =SUM(A2:B2)
3 3 6 =SUM(A3:B3)
我想用VBA回圈完成以上公式的话,可以这样写:
for i = 1 to 3
cells(i,"C") = "=SUM(A" & i & ":B" & i & ")"
Next i
但换个方向的话,
A B C
1 1 4 7
2 2 5 8
3 =SUM(A1:A2)
B3=SUM(B1:B2)
C3=SUM(C1:C2)
因为要递增的是英文的index,A、B、C……,
我不知道要怎麽让回圈这样跑,不知道各位大神们有没有懂我的疑惑了。
麻烦大家解答,感恩感恩!
--
╭─╮ ──╮ ╭─┤╭╮ ╭╭─╮╮ ╭
│ │ │ ││││││ ││││
╰─╮ ╭─┼╮╰─┼╯││││○││││
│ │ ││ │ ││││ ││││
╰─╯ ╰─╯╰──╯ ╰╰╯╰─╯╰╯╯
傻瓜,我们都一样~~ ψsagwow
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 1.34.82.213 (台湾)
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Office/M.1572536171.A.49B.html
※ 编辑: sagwow (1.34.82.213 台湾), 10/31/2019 23:37:17
1F:→ soyoso: sum内以r1c1的方式,cells(3,i)= "=sum(r1c" & i & ":.. 11/01 07:09
2F:推 Iories: "=Sum(R[-2]C:R[-1]C)" 11/01 15:00
3F:→ sagwow: 会了! 感谢大大 11/02 00:15