vb操作EXCEL把符合条件的数据整体复制到另一工作表？
xlbook.sheets(1).Range("A1").CurrentRegion.Copyxlbook.sheets("信贷1").Range("A1")能不能加上条...
xlbook.sheets(1).Range("A1").CurrentRegion.Copy xlbook.sheets("信贷1").Range("A1")
能不能加上条件：某一列=“张三”的所有数据 展开
能不能加上条件：某一列=“张三”的所有数据 展开
1个回答
展开全部
for i= 1 to [a65536].end(3).row
if range("A"&i)="张三" then '这里假设判定A列是否有张三
rows(i).copy sheets("信贷").[a65536].end(3).offset(1)
end if
next i
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
