【開啟視窗選取資料夾顯示路徑】
With Application.FileDialog(msoFileDialogFolderPicker) '開啟選取檔案視窗.InitialFileName = ActiveWorkbook.Path & "\" '預設為目前檔案所在位置
.AllowMultiSelect = False '只能選取單一資料夾
If .Show <> 0 Then '如果有選到資料夾
MsgBox .SelectedItems(1) '顯示資料夾路徑
End If
End With
相關課程：
章老師的電腦小講堂 https://www.facebook.com/ScenicSchool/
※※ 本區做為經常使用之程式碼複製區，提問請至小講堂唷 ※※