EXL_VBA入门培训

《EXL_VBA入门培训》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、EXLVBA入门培训主讲：付代中Monday,March12,2012目录VBA概述--启动程序编辑器录制宏举例将选中的单元格颜色涂上红色录制宏举例开始录制宏操作步骤完成宏录制运行宏需要经常重复执行的某项任务，就可以把执行这些任务的步骤全部录制在宏里，把宏变为可自动执行的任务执行宏的操作执行宏的命令在工具栏上设置宏按钮使用窗体控件使用图形对象执行宏录制宏的步骤录制宏举例宏的基本构成Sub改变颜色()''改变颜色Macro'宏由fu.daizhong录制，时间:2012/3/13''Range("E9")

2、.SelectWithSelection.Interior.ColorIndex=3.Pattern=xlSolidEndWithEndSub宏名批注宏程序宏名最多可为255个字符，不能以数字开始。其中可用的字符包括：字母、数字和下划线。VBA概述--VB和VBA的异同VBA是VB的一个子集,但是功能强大,90%以上的功能都有,全称是VisualBasicForApplication。VBA曾经仅仅应用在MicrosoftOffice中，然而微软通过出售许可证推广了VBA的应用面VB生成独立文件，VBA

3、嵌入在其他文件VBA概述--VBA编辑器的组成工程浏览器代码窗口属性窗口VBA概述--VBA导入和导出VBA编辑器允许导入和导出VBA工程的组件，这使得在其它应用程序和VisualBasic工程中共享程序变得很容易。扩展名组件FRM窗体CLS类模块BAS代码模块VBA概述--运行代码将指针定位在程序的位置，并从运行菜单中选择运行Sub/User窗体，或按F5。编辑录制的代码Sub改变颜色()''改变颜色Macro'宏由fu.daizhong录制，时间:2012/3/13'''Range("E9").Se

4、lectWithSelection.Interior.ColorIndex=3'.Pattern=xlSolidEndWithEndSub在上一节，我们录制了一个宏并查看了代码，代码中有1句实际上并不起作用。哪1句？现在，在宏中作一个修改，删除多余行，直到和下面代码相同：完成后，在工作表中试验一下。你会发现结果和修改前的状况不一样。将With语句前一行:Range(“E9”).Select注释后试着运行该宏,则无论开始选择哪个单元格,宏运行结果都能使选中单元格变红.执行宏选择任何一个单元格，比如A3选

5、择“工具”―“宏”―“宏”，显示“宏”对话框选择“改变颜色”，选择“执行”，则A3单元格的颜色变为红色当执行一个宏时，EXCEL按照宏语句执行的情况就像VBA代码在对EXCEL进行“遥控”。但VBA的“遥控”不仅能使操作变得简便，还能使你获得一些使用EXCEL标准命令所无法实现的功能。而且，一旦熟悉了EXCEL的“遥控”，你都会奇怪自己在没有这些“遥控”的情况下，到底是怎么熬过来的。要执行刚才录制的宏，可以按以下步骤进行：※试着选择其它单元格和几个单元格组成的区域，然后再执行宏，以便加深印象。宏保存的位

6、置宏可保存在2种可能的位置：EXL工作簿(只有该工作簿打开时，该宏才可用)加载宏(独立的程序)可能听说过由计算机病毒引起的潜在威胁。“病毒”是一种在后台工作的隐藏宏或者软件程序，经常骚扰计算机用户，并且毁坏重要的数据文件以及应用软件。宏的保护方法：安全级【高】通常用于用户没有安装防病毒软件的时候安全级【中】用户可以确保所使用的宏命令是安全的安全级【低】Office将不对宏作出任何检查宏的安全性录制宏的局限性录制的宏无判断或循环能力人机交互能力差,即用户无法进行输入,计算机无法给出提示无法显示EXCEL对

7、话框无法显示自定义窗体希望自动化的许多EXCEL过程大多都可以用录制宏来完成.但是宏记录器存在以下局限性.通过宏记录器无法完成的工作有:VBA宏EXCEL环境中基于应用程序自动化的优点也许你想知道VBA可以干什么?使用VBA可以实现的功能包括:使重复的任务自动化自定义EXL工具栏,菜单和界面简化模板的使用自定义EXCEL,使其成为开发平台创建报表对数据进行复杂的操作和分析EXCEL环境中基于应用程序自动化的优点用EXCEL作为开发平台有如下原因:EXCEL本身功能强大,包括打印,文件处理,格式化和文本编

8、辑EXCEL内置大量函数EXCEL界面熟悉可连接到多种数据库EXCEL开发过程简介谁使用这决定了程序的操作难度及界面感观数据来源和保存在哪里这决定了程序的结构如何操作这将决定程序的界面和细节数据处理的结果最终决定程序的价值VBA程序开发的步骤设定引用的参数项目定义对象变量设置对象变量完成对象的接口对象属性操作方法事件程序VBA控制结构分支结构If〈条件1〉Then〈语句块1〉ElseIf〈条件2〉Then〈语句块2〉·Else〈语句块n+1