代码如下: Sub FileDir() Dim p$, f$, k& '获取用户选择文件夹的路径With Application.FileDialog(msoFileDialogFolderPicker) '选择文件夹If .Show ...
確定! 回上一頁