sub test()
dim n%
for n = 2 to 16
range("d2:d16").clearcontents
sheet1.cells(n,"d")=sheet1.cells(n,"b")*sheet1.cells(n,"c")
next
end sub
dim n%
for n = 2 to 16
range("d2:d16").clearcontents
sheet1.cells(n,"d")=sheet1.cells(n,"b")*sheet1.cells(n,"c")
next
end sub













本站有权保留或删除有争议评论。 参与本评论即表明您已经阅读并接受上述条款。