【VBA(十四):VBA中的用户信息交互】【Msgbox+Inputbox+GetOpenFilename+小结】
文章目录
Msgbox
第一参数 (对话框内容)
代码
效果图
第二参数(显示样式)
一共有四层显示内容,用+连接
代码
效果图
第三参数(对话框名称)
代码
效果图
第四参数(帮助文档)
添加帮助文档位置
第五、六参数(帮助文档位置和Context)
返回值
设置返回值
代码
效果图(选中中止)
Inputbox
基本参数
代码
效果图
第四参数(位置)
代码
效果图
第五、六参数(帮助文档位置和Context)
返回值
代码
效果图
方法
比函数在结尾多一个参数,输入类型type
Application.Inputbox()
数字和文本类型,1+2即可
GetOpenFilename
返回值为完整路径
打开文件
第一、二属性(文件、优先类型)
代码
效果图
此时第一个文件类型为优先类型,第二参数为0。
更改第二参数为2。
代码
效果图
返回值
为了避免不选择文件报错
代码
第三参数(对话框标题)
第五参数(是否支持多文件)
True即可多选
此时的变量需要用arr替换str
Workbooks.Open arr(1)
打开多选中的第一文件
小结
概念
Msgbox(提示文字,按钮标题,标题文字,帮助文件,帮助文件索引)
Inputbox(提示文字,标题文字,默认值,左边距,上边距,帮助文件,帮助文件索引,输入类型)
Application.Inputbox
Application.GetOpenFilename