【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%
最新内容