Excel宏基础讲座.ppt

EXCEL宏基础知识培训 EXCEL宏介绍 什么是EXCEL宏? 为什么要使用EXCEL宏? 讲解EXCEL宏 一、录制宏 通过录制宏来学习宏的开发 最简单快速的宏开发就是录制一段宏，然 后修改成需要的结果。（F1是查看帮助的 快捷键） 通过录制宏学习复制粘贴 通过录制宏来学习赋予单元格颜色 录制宏的方法 通过菜单中“工具-宏- 录制新宏”来录制 在弹出的对话框中可指定 宏名称，快捷键，保存位 置和宏功能说明 录制宏的方法 在看到下图所示“停止录制” 工具栏时表示此时宏录制已 经开始了 注意：宏名最多可为255个字符，并且必须以字母开始 。其中可用的字符包括：字母、数字和下划线。宏名中 不允许出现空格。并不是所有的操作过程都可以被宏记 录下来 查看宏代码 打开宏编辑器 工具-宏-Visual Basic编辑器 右键点击Sheet页名称，点击“查看代码” Alt+F11 讲解EXCEL宏 一、录制宏 二、编写宏 最简单的宏 弹出窗口 Sub 弹出窗口 （） Msgbox “Hello,World” End sub EXCEL宏语法介绍 一、定义过程名称 命名规则： * 名字中可以包含字母数字和下划线。 * 名字中不能包含空格句号惊叹号，也不能包含 & $ #字符 * 名字最多可以包含255个字符。 Sub：Sub/end Sub Function ： Function/end Function 相同点：都可以有参数 不同点： Sub不能返回值， Function可以返 回值。 Sub函数中可以调用Function函数。 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=:20 End sub EXCEL宏语法介绍 三、常用对象 Application：Excel应用程序进程对象，可包含多个 WorkBook。 WorkBook：Excel工作簿对象，可包含多个worksheet。 Worksheet：Excel工作表对象。 Sheets：Excel工作表对象集合，可包含多个worksheet。 Range：Excel工作表内单元格集合对象，可包含多个Cell 。 Cells：Excel单元格对象集合，通过cells(r,c)指定行号列 号定位到单元格。 EXCEL宏语法介绍 四、常用函数 Trim（）：去掉字符串前后的空格。 Mid（）：截取字符串中的指定部分 InStr（）：查找一个字符串中另一个字符串出现最初的位置 Cstr（）：转换成字符串类型 Var（）：转换成数值类型 Offset()：在当前单元格基础上向指定方向移动指定格数 Value：获取或设置单元格值(Value2 属性不使用 Currency 和 Date 数据类型 。通过使用 Double 数据类型，可将用这些数据类型设置格式的数据按浮点 数字返回。） Text：取得单元格格式化后的值，只能读取不能写入 Address：得到当前单元格的地址 Now：获得当前日期时间 Name：获取或设置对象名称 IIf (exp, truepart, falsepart)：根据表达式的真假返回值。 Choose (index_num, value1, value2.)：根据序号返回列表中的一个值。 EXCEL宏语法介绍 五、示例 Worksheets.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“执行一个名为text的宏 ActiveWindow.ScrollRow = 1滚动到第一行 InputBox (“Enter your name“)弹出inputbox输入框 kk = Application.GetOpenFilename(“EXCEL (*.XLS), *.XLS“, Title:=“提示： 请打开一个EXCEL文件“)通过打开文件对话框获取文件名 Application.Dialogs(xlDialogZoom).Show 打开zoom对话框 程序控制 Ifthen （elseif） （ else） end If 例子： if n=2 then a=10 elseif n2 then a= 20 else a=30 end if 判断语句 程序控制 Forto next 循环语句 例子： for i=1 to 10 a=a+1 next 调试与错误处理 调试工具。 A, 单步执行过程: 按下F8键 B, 跳过过程(跳过已测试无误的过程节省时间): 按下Shint+F8键 C, 跳出过程(跳过程剩余部份): 按下Ctrl十shift十F8键 D, 运行到光标处(跳过一组语句): 按下Ctrl+F8键 E, 设置下一条语句为光标所指语句(要警惕会忽略不执行中间的语句): 按下Ctrl十F9键 安全性和保护 要在Excel中运行宏必须设置宏的安全级别，默认情况是