会员登录 - 用户注册 - 网站地图 Office中国(office-cn.net),专业Office论坛
当前位置:主页 > 技巧 > Excel技巧 > 编程 > 正文

【Excel VBA】FileDialog 用法之 打开对话框获得文件夹路径

时间:2013-07-27 09:32 来源:天鸣科技 作者:Excel中国录入员 阅读:

FileDialog 可以根据后面的参数,打开通用对话框

Dim strPath As String
Dim MyFileDialog As FileDialog
Set MyFileDialog = Application.FileDialog(msoFileDialogFolderPicker)

    If MyFileDialog.Show = -1 Then
            '使用循环显示选取文件的路径和名称
        For Each vrtSelectedItem In MyFileDialog.SelectedItems
            strPath = vrtSelectedItem
        Next
    End If

MsgBox strPath

这段代码,可以打开一个对话框,选择文件夹,获得选择的文件夹的路径

(责任编辑:admin)

顶一下
(0)
0%
踩一下
(0)
0%
发表评论
请自觉遵守互联网相关的政策法规,严禁发布色情、暴力、反动的言论。
评价: