EXCEL_函数_宏_VBA 入门知识.pptVIP

* * * * * * * * * * * * 以窗体中BUTTON为例 * * * * * * * * * * * * * * * * * * * VBA控制结构 分支结构 If 〈条件1〉 Then 〈语句块1〉 ElseIf 〈条件2〉 Then 〈语句块2〉 · Else 〈语句块n+1〉 End If Select Case 〈测试变量〉 Case 〈表达式1〉 〈语句块1〉 Case 〈表达式2〉 〈语句块2〉 · Case Else 〈语句块n+1〉 End Select VBA控制结构 循环结构 For 〈变量〉=〈初值〉 To 〈终值〉 Step 〈步长〉 〈语句块〉 Next 〈变量〉 For Each 〈对象变量〉 In 〈对象集〉 ? ? 〈语句块〉Next 〈对象变量〉 Do While 〈条件表达式〉 〈语句块〉 Loop 示例：对红色字体的数据求和 Function SUMIFRAD (Target As range) Dim sum As Integer Dim r As range For Each r In Target If r.Font.Color = vbRed Then RGB(255,0,0) sum = sum + r.Value End If Next SUMIFRAD = sum End Function 创建用户窗体 提示使用者选取、输入或浏览数据 使用控件 文本框输入文字 列表框选取内容 选择框选取一个或多个功能 用户窗体窗口的操作 建立用户窗体 配置ActiveX控件 设置窗口属性 配置控件属性及其事件 Load与Unload语句 加载到内存或从内存中释放 用Show和Hide方法控制对象的显示和隐藏 VBA帮助你完成从必然王国到自由王国的飞跃 轻松一刻 -excel *控制特定单元格输入文本的长度 *给自己的函数建立新菜单 1.在工具栏空白处右击鼠标，选“自定义”选项，打开“自定义”对话框。在“命令”标签中，选中“类别”下的“新菜单”项，再将“命令”下面的“新菜单”拖到菜单栏。 2.再在“类别”下面任选一项（如“插入”选项），在右边“命令”下面任选一项（如“超链接”选项） 单击“数据”菜单的“有效性”选项。在“设置”卡片“有效性条件”的“允许”下拉菜单中选择“文本长度”。然后在“数据”下拉菜单中选择“等于”，且“长度”为“4”。 终极突破 什么是VBS？ Vbs是一种Windows脚本，它的全称是:Microsoft Visual Basic Script Editon.(微软公司可视化BASIC脚本版)， VBS是Visual Basic的的一个抽象子集，是系统内置的，用它编写的脚本代码不能编译成二进制文件，直接由Windows系统执行（实际是一个叫做宿主host的解释源代码并执行），高效、易学，但是大部分高级语言能干的事情，它基本上都具备，它可以使各种各样的任务自动化，可以使你从重复琐碎的工作中解脱出来，极大的提高工作效率。 应用领域 Windows操作系统 VBScript可以被用来自动地完成重复性的Windows操作系统任务。在Windows操作系统中，VBScript可以在Windows Script Host的范围内运行。Windows操作系统可以自动辨认和执行 *.VBS和*.WSF两种文件格式 网页浏览器 网页服务器 Sendkeys函数 Sendkeys函数 　　函数名称：Sendkeys 　　主要功能：将一个或多个按键消息发送到活动窗口，就如同在键盘上进行输入一样。 　　使用格式：SendKeys string[, wait] 　　参数说明：string 必需的。字符串表达式，指定要发送的按键消息。 Wait 可选的。 　　 　　特别提醒：对 Sendkeys 来说，加号 (+)、插入符 (^)、百分比符号 (%)、上划线 (~) 及圆括号 ( ) 都具有特殊意义。为了指定上述任何一个字符，要将它放在大括号 ({}) 当中。例如，要指定正号，可用 {+} 表示。为了指定大括号字符，请使用 {{} 及 {}}。 Sendkeys函数 为了指定那些与 SHIFT、CTRL 及 ALT 等按键结合的组合键，可在这些按键码的前面放置一个或多个代码，这些代码列举如下 ： 按键 代码 SHIFT + CTRL ^ ALT % 特别提醒：为了说明在按下其它按键时应同时按下 SHIFT、CTR