Excel for macのVBAでフォルダ選択する方法

macではFileSystemObjectを使えないので、代わりにMacScriptを使ってフォルダ選択ダイアログを表示する。

 Public Sub test()
 
    Dim SelectedPath As String
    
    SelectedPath = MacScript("return posix path of (choose folder with prompt ""Select the folder"") as string")
    
    Debug.Print SelectedPath
     
 End Sub

実行結果

/Users/ooki/OneDrive/Documents/Qiita記事/

日本語フォルダも正しく表示されてる。バッチリ。

##確認バージョン

Excel for mac バージョン 16.41（20091302）