有B,C,D,E,四列数字.G列公式=A1+1 ,请问用vba怎么让J=C1+1,M=D1+1,P=E1+1?要代码哦.

有B,C,D,E,四列数字.G列公式=A1+1 ,请问用vba怎么让J=C1+1,M=D1+1,P=E1+1?要代码哦.如图:
制版师 1年前 已收到2个回答 举报

nightlixin 花朵

共回答了10个问题采纳率:90% 举报

中间这么写
sub abc()
For n = 1 To 20
Range("G" & n).FormulaR1C1 = "=RC[-5]+1"
Range("J" & n).FormulaR1C1 = "=RC[-7]+1"
Range("M" & n).FormulaR1C1 = "=RC[-9]+1"
Range("P" & n).FormulaR1C1 = "=RC[-11]+1"
Next n
end su

1年前 追问

9

制版师 举报

你写个完整的过来好吗?谢谢

举报 nightlixin

完整了啊
你表达得就是这些。。。

制版师 举报

代码是对的。谢谢。再请问下,代码中-5,-7,-9,-11是什么意思。怎么得出来的?

举报 nightlixin

5是B列和G列的间距
以此类推

水漾漪涟 幼苗

共回答了1个问题 举报

range("J1")="=C1+1"

1年前

2
可能相似的问题
Copyright © 2024 YULUCN.COM - 雨露学习互助 - 19 q. 0.026 s. - webmaster@yulucn.com