乔山办公网我们一直在努力
您的位置:乔山办公网 > excel表格制作 > 求<em>EXCEL</em>用<em>VBA</em>的IF条件语句与

求<em>EXCEL</em>用<em>VBA</em>的IF条件语句与

作者:乔山办公网日期:

返回目录:excel表格制作


我是这么认为的:每一次复制后面都要有粘贴才行,即把粘贴也放到循环里面才行。要不粘贴时只粘贴最后的复制内容。

最简单的来两句,不明白请追问~~~

FOR的用法是这样的:
FOR I=1 TO N
......语句......
NEXT I
这样的功能是,使里面的 语句 运行N次,每次I的值都不同,分别是1~N,用来完成固定次数的重复。

IF的用法是这样的:
IF 条件 THEN
.......语句1.......
ELSE
......语句2......
END IF
这样的功能是判断条件是否满足,如果满足就执行 语句1,否则执行 语句2

以上例子中的语句、语句1、语句2都可以是一个或者多个语句,往往是一段。
1,假设需要将sheet1中的第一行复制到sheet2,中,采用如下代码
Sub 复制行()
Sheets(1).Range("A1").EntireRow.Copy Sheets(2).Range("A1")
End Sub
2,其中,Sheets(1).Range("A1")中的Range("A1")可以更改为任何一个单元格或单元格区域,表达方式可以用cell方式实现循环
3,Sheets(2).Range("A1")为粘贴的目标位置,同样可以用cell(a,b)实现自动循环。

亲,zhidao几点不明白:
1、这个Selection是揍啥?您先要手工选择数据区域么?
2、把J从第一行循环到最后一行,和下面的COPY代码似乎没有半毛钱关系呀?换句话说,COPY的列知道了,行呢?
您还是举个例子详细说一下吧。

相关阅读

关键词不能为空
极力推荐

ppt怎么做_excel表格制作_office365_word文档_365办公网