欢迎来到天天文库
浏览记录
ID:26121952
大小:288.87 KB
页数:15页
时间:2018-11-24
《excel-vba基础入门》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、EXCELVBA基础入门1.什么是宏?它在那里?2.宏的安全性问题5.VBA编辑器7.程序结构8.VBA语法4.VBA语言介绍3.录制宏9.编写程序6.对象、属性、方法和事件1.什么是宏?它在那里?宏是一个指令集,用来告诉EXCEL完成用户指定的动作。宏类似于计算机程序,但是它是完全运行于EXCEL之中的,我们可以使用宏来完成枯燥的、频繁的重复性工作。宏完成动作的速度比用户自己做要快得多,能大大提高效率。office中都有宏的身影。增加鼠标寿命2.宏的安全性问题宏是依附于office文件的程序,可能有恶意的宏程序,即宏病毒。所以一般默认是禁止宏的,再加上编程问题,一般不敢用“宏”,对于
2、提高办公效率只能依赖于EXCEL技巧。3.录制宏运行宏录制宏安全性VBA编辑器4.VBA语言介绍翻译:直观基本应用本质:与VB相似,一种应用程序开发工具,是可视化、面向对象、事件驱动方式的结构化程序设计语言由应用程序控制也可以增强应用程序的功能由微软公司开发是Office套件的一部分极大的提高办公效率VBA(VisualBasicforApplications)5.VBA编辑器工程资源管理器代码窗口Application当前应用程序对象Workbook工作簿对象Worksheet工作表对象Range由一个或多个单元格构成的区域6.对象、属性、方法和事件对象代表应用程序中的元素,比如,工
3、作表、单元格、图表、窗体。在VisualBasic的代码中,可在使用对象的任一方法或改变它的属性之一的值之前,必须去识别对象。选择一个单元格(展示对象的层次结构)应用程序.工作簿.工作表.区域.选择Application.Workbooks(“jbk.xls”).Worksheets(“j1”).Range(“A1”).Select在当前工作簿中选择一个单元格Range(“A1”).SelectWorksheetFunction属性(可以从代码中访问任何内置的工作表函数)例子(检查规定的单元格区域内是否还有空的)IfApplication.WorksheetFunction.Count
4、Blank(Range(“a1:c10”))>0ThenMsgbox“您必须在所有的单元格中添加数据”EndIfActiveWorkbook属性:返回指向活动工作簿的对象ActiveSheet属性:返回指向活动工作表的对象Selection属性:返回一个对当前选定单元格区域的引用ThisWorkbook属性:在任何时候返回对包含代码的工作簿的引用6.1Application对象打开已有的工作簿Application.Workbooks.Open“c:abc.xls”添加新的工作簿Workbooks.Add引用工作簿DimwkbasWorkbookSetwkb=Workbooks.Ad
5、d保存工作簿DimwkbasWorkbookForEachwkbinApplication.Workbookswkb.Save(.SaveAs“c:abc.xls”)Nextwkb关闭工作簿ActiveWorkbook.CloseSaveChange:=True,FileName:=“c:abc.xls”6.2Workbooks对象Add方法:添加新的工作表ActiveWorkbook.Worksheets.AddAfter:=Worksheet(“Sheet3”)Count:=2Count属性:返回工作簿中的工作表数ActiveWorkbook.Worksheet.AddAfte
6、r:=Worksheet(Worksheets.Count)Name属性:命名工作表Worksheets(2).Name=“test”Activate方法:选择并显示一个工作表ActiveWorkbook.Worksheets(“test”).ActivateMove方法:移动工作表的位置ActiveWorkbook.Worksheets(“test”).MoveBefore:=ActiveWorkbook.Worksheets(1)Delete方法:从工作簿中删除工作表Application.DisplayAlerts=False(不显示提示信息)ActiveWorkbook.Wor
7、ksheets(“test”).Move6.3WorkSheet对象Value属性:设置单元格中的数值Range(“A1”).Value=Range(“A1”).Value*80Formula属性:将指定的公式放入单元格区域Range(“A3”).Formula=“=A1+A2”Rows和Columns属性:返回工作表中一个完整的行或列Rows(1)表示活动工作表中第一行的Range对象Range属性:对一个相邻或不相邻的单元格区域返回一个Ra
此文档下载收益归作者所有