文章目录
- 1. 函数
-
- 1.1 Windows API
- 1.2 自定义函数
-
- 1.2.1 去除空格
- 1.2.2 测试图片格式
- 1.2.3 获取打印机信息
- 1.2.4 GB/T 8170 修约
- 1.2.5 邮箱格式检查
- 1.2.6 汉字转拼音
- 1.2.7 列标签字母与列序号数值转换
- 1.2.8 大小写金额转换
- 1.2.9 分离文本与数字
- 1.2.10 判断Access库的【日期】字段中,是否包含某个“年份”
- 1.2.11 判断当前“年月”数是否存在于Access Table表日期字段中
- 1.2.12 判断某字符串是否属于某字段名集合的成员
- 1.2.13 列标签字母与列序号互转
- 1.2.14 VBA 十进制颜色值转RGB颜色
- 1.2.15 取得Temp路径名的API函数
- 1.2.16 自动创建多级文件夹/目录
- 1.2.17 检测用户电脑类型(台式机、笔记本等的检测)
- 1.2.18 获取系统临时文件目录函数
- 1.2.19 禁止在TextBox文本框中输入空格或空行回车
- 1.2.20 枚举文件函数(查找文件和文件夹)
- 1.2.21 ping 主机(域名或IP地址均可)
- 1.2.22 数字日期转中文大写日期
- 1.2.23 API 函数获取屏幕分辨率
- 1.2.24 从全路径文件名中,分离出文件名及扩展名
- 1.2.25 计算两个日期间隔的天数(不计周末和节假日)
- 1.2.26 获取汉字的拼音首字母
- 2. sub过程
-
- 2.1 批量删除自定义菜单和工具栏
- 2.2 设置按钮自动响应Enter和Esc键按下
- 2.3 vba 电子秒表计时器
- 2.4 VBA窗体文本框右键菜单 - 粘贴复制文本功能
- 2.5 单元格格式设置
- 2.6 列数转换为列标字母
- 2.7 Access表导出为Excel表格
- 2.8 VBA 中使用WebBrowser网页控件
- 2.9 获取 IP、网关、掩码
- 2.10 获取当前用户桌面的路径
- 2.11 多个TextBox文本框集合响应-类模块
- 2.12 限制文本框输入
- 2.13 Range对象 - CurrentRegion 用法示例
- 2.14 折叠 Excel工作簿功能区
- 2.15 输出保存为系统临时文件夹中的txt文件,并自动打开
- 2.16 遍历控件
- 2.17 解决SendKeys发送按键后,小键盘被关闭
- 2.18 禁止按 Ctrl+ break中断程序
- 2.19 统计代码量
- 2.20 选中的行/列高亮
- 2.21 图表系列(图列)自动排序
- 2.22 本工作簿外其它工作簿保存并关闭(判断是否新建未保存还是已保存过)
- 2.23 记录集转数组并与另一个数组比较
- 2.24 合并指定目录下所有工作簿全部工作表
- 2.25 提取指定列并写入另一工作表指定列
- 2.26 限制首位为字母P,后5位为数字
- 2.27 仅一行代码实现单元格区域去重(RemoveDuplicates方法)
- 2.28 获取控件所在单元格区域
- 3. 控件属性设置技巧
- 4. 内置函数
1. 函数
1.1 Windows API
1.1.1 改变当前鼠标指针形状
-
声明:
Public Const HandCursor = 32649& '手型光标 Public Declare Function SetCursor Lib "user32" (ByV