【VBA(十四):VBA中的用户信息交互】【Msgbox+Inputbox+GetOpenFilename+小结】
文章目录
Msgbox
第一参数 (对话框内容)
第二参数(显示样式)
第三参数(对话框名称)
第四参数(帮助文档)
第五、六参数(帮助文档位置和Context)
返回值
Inputbox
基本参数
第四参数(位置)
第五、六参数(帮助文档位置和Context)
返回值
方法
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
赞 (0)