Excel宏基础学习教程.pptx

《Excel宏基础学习教程.pptx》由会员分享，可在线阅读，更多相关《Excel宏基础学习教程.pptx（19页珍藏版）》请在得力文库 - 分享文档赚钱的网站上搜索。

1、EXCEL宏介绍什么是EXCEL宏?为什么要使用EXCEL宏?第1页/共19页讲解EXCEL宏一、录制宏第2页/共19页通过录制宏来学习宏的开发最简单快速的宏开发就是录制一段宏，然后修改成需要的结果。（F1是查看帮助的快捷键）通过录制宏学习复制粘贴通过录制宏来学习赋予单元格颜色第3页/共19页录制宏的方法 通过菜单中“工具-宏-录制新宏”来录制在弹出的对话框中可指定宏名称，快捷键，保存位置和宏功能说明第4页/共19页录制宏的方法 在看到下图所示“停止录制”工具栏时表示此时宏录制已经开始了注意：宏名最多可为255个字符，并且必须以字母开始。其中可用的字符包括：字母、数字和下划线。宏名中不允许出现

2、空格。并不是所有的操作过程都可以被宏记录下来第5页/共19页查看宏代码打开宏编辑器工具-宏-Visual Basic编辑器右键点击Sheet页名称，点击“查看代码”Alt+F11第6页/共19页讲解EXCEL宏一、录制宏二、编写宏第7页/共19页最简单的宏弹出窗口Sub 弹出窗口（）Msgbox“Hello,World”End sub第8页/共19页EXCEL宏语法介绍一、定义过程名称命名规则：*名字中可以包含字母数字和下划线。*名字中不能包含空格句号惊叹号，也不能包含&$#字符*名字最多可以包含255个字符。Sub：Sub/end SubFunction：Function/end Funct

3、ion相同点：都可以有参数不同点：Sub不能返回值，Function可以返回值。Sub函数中可以调用Function函数。第9页/共19页EXCEL宏语法介绍二、定义变量使用dim 语句定义变量例如：Dim n as integer 定义n为integer类型的变量Dim st as worksheet 定义worksheet对象类型的变量Dim ZeroArray(0 To 5)定义下标范围为0到5的数组Sub run()dim a as integer a=:20End sub第10页/共19页EXCEL宏语法介绍三、常用对象Application：Excel应用程序进程对象，可包含多个W

4、orkBook。WorkBook：Excel工作簿对象，可包含多个worksheet。Worksheet：Excel工作表对象。Sheets：Excel工作表对象集合，可包含多个worksheet。Range：Excel工作表内单元格集合对象，可包含多个Cell。Cells：Excel单元格对象集合，通过cells(r,c)指定行号列号定位到单元格。第11页/共19页EXCEL宏语法介绍四、常用函数Trim（）：去掉字符串前后的空格。Mid（）：截取字符串中的指定部分InStr（）：查找一个字符串中另一个字符串出现最初的位置Cstr（）：转换成字符串类型Var（）：转换成数值类型Offset(

5、)：在当前单元格基础上向指定方向移动指定格数Value：获取或设置单元格值(Value2 属性不使用 Currency 和 Date 数据类型。通过使用 Double 数据类型，可将用这些数据类型设置格式的数据按浮点数字返回。）Text：取得单元格格式化后的值，只能读取不能写入Address：得到当前单元格的地址Now：获得当前日期时间Name：获取或设置对象名称IIf(exp,truepart,falsepart)：根据表达式的真假返回值。Choose(index_num,value1,value2.)：根据序号返回列表中的一个值。第12页/共19页EXCEL宏语法介绍五、示例Workshe

6、ets.Add增加一个工作表activesheet.delete删除当前工作表Workbooks.Open FileName:=C:Book1.xls打开一个文件ActiveWindow.Close关闭当前工作簿ActiveCell.Clear清除单元格中所有文字、批注、格式、所有的东西MsgBox Selection.Rows.Count弹出选中范围的单元格的行数MsgBox Selection.Columns.Count 弹出选中范围的单元格的列数Msgbox Selection.Address 弹出选中范围的单元格的地址Application.Run macro:=text执行一个名为t

7、ext的宏ActiveWindow.ScrollRow=1滚动到第一行InputBox(Enter your name)弹出inputbox输入框kk=Application.GetOpenFilename(EXCEL(*.XLS),*.XLS,Title:=提示：请打开一个EXCEL文件)通过打开文件对话框获取文件名Application.Dialogs(xlDialogZoom).Show 打开zoom对话框第13页/共19页程序控制Ifthen（elseif）（else）end If例子：if n=2 thena=10 elseif n2 then a=20 elsea=30 end i

8、f判断语句第14页/共19页程序控制Fortonext循环语句例子：for i=1 to 10 a=a+1 next第15页/共19页调试与错误处理调试工具。A,单步执行过程:按下F8键 B,跳过过程(跳过已测试无误的过程节省时间):按下Shint+F8键C,跳出过程(跳过程剩余部份):按下Ctrl十shift十F8键 D,运行到光标处(跳过一组语句):按下Ctrl+F8键 E,设置下一条语句为光标所指语句(要警惕会忽略不执行中间的语句):按下Ctrl十F9键第16页/共19页安全性和保护要在Excel中运行宏必须设置宏的安全级别，默认情况是高级，此时宏无法运行。需修改成中级或低级。（修改为中级时如打开含有宏的工作簿时系统会弹出是否启用宏的提示，若要运行宏则必须选择启用宏）第17页/共19页安全性和保护代码的密码保护打开VBE工具VBAProject 属性保护，勾选查看时锁定工程，输入密码后点确定第18页/共19页感谢您的欣赏！第19页/共19页