大家好，对VBA实例：得到一个文件名感兴趣的小伙伴，下面一起跟随三零脚本的小编来看看VBA实例：得到一个文件名的例子吧。

'来自：三零脚本（www.q3060.com）
Sub MyNZ()
Dim kk As String
kk = Application.GetOpenFilename("EXCEL (*.XLSM), *.XLSM", Title:="提示：请打开一个EXCEL文件：")
msgbox kk
END SUB

代码的解析说明：上述代码过程在执行过程中，将弹出一个打开的对话框，让用户选择某个文件，并用变量KK记录这个文件名,这个文件名是包含地址的FULLNAME。注意此时的代开对话框并不是真的打开这个文件。