资源描述：
《VBA自已学习笔记》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。
1、MsgBoxWorkbooks.Count这是统计打开工作薄的数量Workbooks后再输入个点("."),就会出现一个下拉框,框中的带小手指的就是工作薄集合的属性,带飞行的小书本的是方法,比如:新建(ADD),关闭(CLOSE),打开(OPEN)就是方法例如：Workbooks.OpenFilename:="c:2.xls"打开指定的工作簿Workbooks("2.XLS").Activate把打开的某个工作设为当前工作薄一次新建多个工作薄:Fori=10To13Workbooks.AddActiveWorkbook
2、.SaveAsFilename:="c:"&i&".xls"NextWorkbooks.close是关闭所有打开的工作薄Workbooks("123,XLS").close是关闭指定的工作薄二、在VBA中，单元格常用的表示方法有两种，学会一块多块区域的选择命令，赋值，单元格字体边框的属性。一种是RANGE如A1在VBA的表示方法是Range("a1")A1:A100的表法方法是：Range("A1:A100")和以前一样,大家先在工作表中插入一个矩形作为执行宏的按纽在按纽上单击右键,单击指定宏,再单击新建,在VBE窗口
3、中的代码窗口会出现Sub矩形1_单击()EndSub在两句中间输入Range("a1")=1000Range可以代表一个单元格区域,也可以代表一个单元格,通过Range("a1")=1000也可以看出,它的用法是Range后括号中带上"A1"就可以表示我们平时在工作表用到的中的A1单元格了,它在表示一个连续区域时是这个的,Range("区域的左上角单元格：区域的右下角单元格")请把刚才的代码再加上一句:Range("a1:a10")=1000对,如果是不连续的单元格多个区域,它是这样表示的:Range("单元格区域1,单
4、元格区域2.....")把刚才的代码替换为:Range("a1:a10,c1:c10,e1:e10")=100再试试[A1]是Range("A1")的简写.二者在用法上没有什么区别,但在输入时有点不同,如当你输入[A1]后加点时,后面不会出现属性和方法列表,而输入Range("A1")加点后则会出现属性列表供你选取Application.Intersect(Range("a1:a10"),Range("a3:c4")).Select这一句的意思是选中区域A1：A10和A3:C4重叠的区域，即两个区域共有的区域，此名代码运
5、行的结果是选中区域A3：A4注意Intersect方法是一个非常实用的一个方法，比如我们在动态选取工作表Sheet1A列中已存在数据的区域时，就会用到它。在介绍这个用法前还要介绍一下另一个工作表中非常实用的属性：Usedrange你可以选试着运行一下:Activecell.usedrange.Select2003不支持可用这个ActiveSheet.UsedRange.SelectSheet1.UsedRange.Select行Activecell.usedrange.Select你会发现，在当前工作表中的所有用过的区域
6、全被选中了。你明白了吗，其实usedrange就是工作表中所有已存在内容的矩形区域，为什么不说是存在内容的单元格呢？原因是比如你在一个空工作表中的B3和C5单元格任意输入一个数值，运行Activecell.usedrange.Select后选取的不只是B3和C5单元格，而是B3:C5单元格区域我们平时在程序中会看到Activesheetworksheets("sheet1")sheet1sheets("sheet1")Sheets(1)顺便说一说他们的区别Activesheet是指当前活动工作表，即你正在操作的工作表wo
7、rksheets("sheet1")等同于sheets("sheet1")是特指工作表Sheet1,注意这时的Sheet1是工作表的名子,就如同"员工工资表"一样是工作表的名称,而Sheet1和Sheets(1),不管你如何命名，Sheet1和Sheets(1)就只代表第一个工作表，Sheet2和Sheets(2)代表第二个工作表。。。。下面以一个实例说明如何动态选取一个区域：要求：无论工作表中所有单元格如何填入，运行程序后要选取A列已用所有区域：代码如下：Intersect(Range("a:a"),Sheets("s
8、heet1").UsedRange).SelectRange("a:a")是A列，Sheets("sheet1").UsedRange是工作表sheet1已使用的所有单元格区域，用Intersect求二者的共有区域，结果就是我们所要的A列已用所有区域其实这中间有个规律：如果你输入的是非数字的字符，即使你删除了，也被当
