在EXCEL中如何用VB控制单元格当条件满足时下移
4个回答
展开全部
LZ给的代码给错了,你给的是出库......
dim n as integer
n=val(text1.text) *n 用来放excel表格的行数,因为不知道你有多少行,暂时用这个表示吧
Private Sub Command1_Click()
for i=1 to n
if cells(f,i)<>0 then
cells(d,i)=Cells(d, i)+cells(f,i)
end if
next
End Sub
dim n as integer
n=val(text1.text) *n 用来放excel表格的行数,因为不知道你有多少行,暂时用这个表示吧
Private Sub Command1_Click()
for i=1 to n
if cells(f,i)<>0 then
cells(d,i)=Cells(d, i)+cells(f,i)
end if
next
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
单元格的选则,使用cells()方法:
cells(1,1)表示A1
你的问题可以往里面代如:
cells(cells(2,2).value+cells(2,3).value+cells(2,5).row,5).select
cells(1,1)表示A1
你的问题可以往里面代如:
cells(cells(2,2).value+cells(2,3).value+cells(2,5).row,5).select
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
if [e2]=5 then [e2].offset(5.0).select
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
鸿煊
灵芸
平卉
灵芸
平卉
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询