Excel宏功能简单应用介绍.pdf

《Excel宏功能简单应用介绍.pdf》由会员分享，可在线阅读，更多相关《Excel宏功能简单应用介绍.pdf（3页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、-cece宏功能简单应用介绍宏功能简单应用介绍所谓宏,就是一组指令集，通过执行类似批处理的一组命令，来完成某种功能。icrosfOice 的组件都可以支持宏（Macro)的操作，而 Ofice 的宏是指使用 VBcript 指令集（VB 编程语言的子集，可以使用 VB 的常用语句)编写的针对 Ofc组件的小程序。利用宏，我们可以完成很多程序原本并不支持的特殊应用,比如完成某种特殊的数据计算,或者文档的特殊格式排版等等。下面,就让我们举个简单的例子,看看宏在 Excl 中如何应用。有这样一个xce表格，工作表 St1 中的第行的 B 列开始至 D 列的连续单元格中是一组共个数据，第 A 列的第

2、3 行开始至第行的连续单元格中是一组共个日期，要编写一段宏来完成这样的工作:将heet第 2 行的数据由左至右依次纵向复制到 Shet的 B 列（从2 开始）中,然后将这组复制完的 3 个数据所在行的 A 列都填入he1 的 A3 单元格里面的日期,完成后重复之前的操作,将het1 第 2 行的数据再次复制到 Shet的 B 列,这次是从上次复制的 B 列数据下面的空白单元格，也就是 B5 开始,然后再在这次复制的个数据的左侧 A 列填入 S1 的 A4 单元格的日期,这样反复循环，直到 Se1 的列的所有日期都出现在了 Sheet2 的 A 列里面，也就是het的第2 行数据在 Shee2

3、的列里面被复制了次为止。编写宏只要有一点点简单的 V编程知识就可以了,并不一定需要很高深的编程技巧，很多时候我们需要的只是一些重复的操作,我们可以通过宏的录制功能来录制一次需要的操作过程，然后再对已经录制的宏进行简单的修改,就能得到所需要的宏了。对于上面这个事例,实际上只是简单的复制操作，所以甚至连录制的工作都可以省掉了。因为所需要的操作是一个循环的过程，所以我们可以使用一个循环语句来编写程序,这样只要写出一个完成的复制过程，一次循环就可以达到我们的目的了。循环判断的依据就是是否he1 的 A 列所有日期都复制过了,因为数据都是连续排列的,艘以我们可以把 Shet1 的 A 列某个单元格是否有

4、数据作为进入循环的条件,依次复制日期,直到 A7 这个没有数据的空单元格,循环结束,我们的工作也就完成了。至于循环里面的内容，我们同样再嵌套一个循环，只不过这次是判断第 2 行的数据是否全都复制完成了,在这个循环里面自然就是单元格数据和日期的复制了。ubacro1(）Dim st1yDm st2Dim t1x-sy sty=2 hile Seets(“heet1”）ells(st,A)sx 2 Do While eets(“Seet1”).Cels(，stx）Shets(“heet2”).Cells(t2y,B)=Shet(“het”)Cels(2,s1）Sees（“She2”)Cels(st

5、2y,)=heet（“Sheet1”).Cells(sty，A)stx=st1x+t2=st2+1 Lo st1y=st1y Loop End u上面就是我编写的这个宏的所有内容,让我再来详细说说每个命令的作用:第一行的“bMaco1()”和最后一行的“End Sb”是整个宏的开始和结尾标志，Macr1 就是这个宏的名字。“im”是定义一个变量,“st1y”是我定义的 Shet1 的 Y 轴坐标变量,同理，“st1x”就是 Shee的 X 轴坐标变量，“ty”自然是he的 Y轴坐标变量了。“st1y=3”这是一个赋值语句，下面的“Shets(St2).Cells（st2y,）=Sets(She

6、et1).Cells（2,st1x)”这句也是,它们的作用都是将等号后面的数值赋予给等号前面的变量，就是说,等号前面必须是一个变量而不能是常量。这里分别给st1y 和 st2y 赋予初始值 3 和 2，代表他们分别是从第 3 行(Shet的日期是从 A3 开始的)和第行开始。“DWhile”就是我们整个程序中最重要的循环语句了,“hee（She1).Cells(s1y,A）”是代表的het这个工作表的某个单元格，ells 后的括号内就是单元格的坐标，格式是 Cells(Y 轴,轴）,那个 A3这个单元格就应该表示为s（3,A)，这里注意,字符和字符串常量都必须用引号括起来，另外,X 周除了用字母标示以外,也可以使用对应的数字来表示。第一个循环就是判断是否在 Shet1 的 A 列的某个单元格碰到了空白格，-如果没有，就进入循环执行里面的程序。与这个“Dohile”相对应的就是倒数第二行的“oop”。进入循环以后对 stx 进行赋值,然后进入第二个循环，判断 Seet1 的第 2行是否遇到了空白单元格，没有的话就继续执行下面的程序。之后就是按照规则对单元格内容进行复制,之后给变量增值，以便循环能够顺利的执行,直到完成所有的操作。-