Excel_VBA常用技巧_第08章控件与用户窗体.doc

VBA常用技巧 目录 VBA常用技巧 1 第8章 控件与用户窗体 4 技巧1 限制文本框的输入 4 技巧2 文本框添加右键快捷菜单 6 技巧3 文本框回车自动输入 10 技巧4 自动选择文本框内容 11 技巧5 设置文本框数据格式 12 技巧6 限制文本框的输入长度 14 技巧7 将光标返回文本框中 15 技巧8 文本框的自动换行 17 技巧9 多个文本框数据相加 19 技巧10 控件跟随活动单元格 20 技巧11 高亮显示按钮 21 技巧12 组合框和列表框添加列表项的方法 23 12-1 使用RowSource属性添加列表项 23 12-2 使用List属性添加列表项 24 12-3 使用AddItem方法添加列表项 25 技巧13 去除列表框数据源的重复值和空格 27 技巧14 移动列表框条目 29 技巧15 允许多项选择的列表框 32 技巧16 多列组合框和列表框的设置 35 16-1 多列组合框和列表框添加列表项 35 16-2 多列列表框写入工作表 37 技巧17 输入时逐步提示信息 39 技巧18 二级组合框 46 技巧19 使用DTP控件输入日期 48 技巧20 使用RefEdit控件选择区域 51 技巧21 如何注册控件 52 技巧22 遍历控件的方法 55 22-1 使用名称中的变量遍历控件 55 22-2 使用对象类型遍历控件 57 22-3 使用程序标识符遍历控件 58 22-4 使用名称中的变量遍历图形 59 22-5 使用FormControlType属性遍历图形 60 技巧23 使微调框最小变动量小于1 61 技巧24 不打印工作表中的控件 63 24-1 设置控件格式 63 24-2 设置控件的printobjcet属性 65 技巧25 在框架中使用滚动条 65 技巧26 使用多页控件 67 技巧27 标签文字垂直居中对齐 69 技巧28 使用TabStrip控件 71 技巧29 显示GIF动画图片 73 技巧30 播放Flash文件 76 技巧31 在工作表中添加窗体控件 78 31-1 使用AddFormControl方法 79 31-2 使用Add方法 81 技巧32 在工作表中添加ActiveX控件 83 32-1 使用Add方法 84 32-2 使用AddOLEObject方法 86 技巧33 使用spreadsheet控件 87 技巧34 使用Listview控件 90 34-1 使用Listview控件显示数据列表 90 34-2 在Listview控件中使用复选框 93 34-3 调整Listview控件的行距 95 34-4 在Listview控件中排序 98 34-5 Listview控件的图标设置 99 技巧35 调用非模式窗体 102 技巧36 进度条的制作 104 36-1 使用进度条控件 104 36-2 使用标签控件 106 技巧37 使用TreeView控件显示层次 109 技巧38 用户窗体添加图标 113 技巧39 用户窗体添加最大最小化按纽 115 技巧40 禁用窗体标题栏的关闭按钮 116 技巧41 屏蔽窗体标题栏的关闭按钮 117 技巧42 无标题栏和边框的窗体 119 技巧43 制作年月选择窗体 120 技巧44 自定义窗体中的鼠标指针类型 123 技巧45 调整窗体的显示位置 124 技巧46 由鼠标确定窗体显示位置 126 技巧47 用户窗体的打印 127 技巧48 使用自定义颜色设置窗体颜色 129 技巧49 在窗体中显示图表 130 49-1 使用Export方法 130 49-2 使用API函数 132 技巧50 窗体运行时调整控件大小 133 技巧51 在用户窗体上添加菜单 136 技巧52 在用户窗体上添加工具栏 140 技巧53 使用代码添加窗体及控件 145 技巧54 用户窗体的全屏显示 151 54-1 设置用户窗体为应用程序的大小 151 54-2 根据屏幕分辨率进行设置 152 技巧55 在用户窗体上添加状态栏 153 控件与用户窗体 限制文本框的输入 用户文本框输入数据限制类型，比如能输入数字是没有内置的属性能限制在文本框中只能输入数字在文本框的事件过程中使用代码来测试输入哪类字符，然后允许输入数字字符#001 Private Sub TextBox1_KeyPress(ByVal KeyANSI As MSForms.ReturnInteger) #002 Select Case KeyANSI #003 Case Asc(0) To Asc(9) #004 Case Asc(-) #005 If InStr(1, Me.TextBox1.Text,