用vba实现公式

发布网友发布时间：2022-07-23 06:24

共1个回答

热心网友时间：2023-11-24 10:08

sub aaa()
x=1
for i=17 to 30
x=x*(1+cella(2,i)/10)
next
range("O2")=range("M2")*x+range("P2")/10
end sub追问谢谢，我想批量获取整列的值

追答

再套一层循环呀

sub aaa()
for j=2 to [M65536].end(3).row
x=1
for i=17 to 30
x=x*(1+cells(j,i)/10)
next
range("O"& j)=range("M"& j)*x+range("P"& j)/10
next

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com