【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