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中运行宏必须设置宏的安全级别，默认情况是高级，此时宏无法运行。需修改成中级或低级。（修改为中级时如打开含有宏的工作簿时系统会弹出是否启用宏的提示，若要运行宏则必须选择启用宏）,安全性和保护,代码的密码保护 打开VBE工具VBAProject 属性保护，勾选查看时锁定工程，输入密码后点确定,