PowerPoint for Mac マクロ パスがうまく指定できません

Question

前提・実現したいこと

PowerPoint for Mac ver16.45

パワーポイントのマクロでスライドをPNGで、任意のスライド名で保存する方法を検討しています。
理想はslide1.png,slide2.pngと保存していきたいのですが、保存先のパスを指定するところで、任意のフォルダに指定ができずに困っています。

発生している問題・エラーメッセージ

以下のようなソースコードで、まずは任意の場所にスライドをPNGで保存したいのですが、このマクロでは/Users/ユーザーの名前/Pictures:fileName
と言う感じで、[Pictures:fileName]と言うフォルダができてしまいます。
まず作りたいところは「ピクチャ」の場所なんですが。
このスライドがあるディレクトリは/Users/ユーザーの名前/ピクチャ/にいるのですが、.Pathで取得したパスはPictureになってるんですよね。
それに、最終的には/Users/ユーザーの名前/ピクチャ/fileName/slideOO.png
と作っていきたいのですが、まずパスがうまくできません。
powerpoint for Mac ではパスの区切りは[:]と言うらしいですが、これも適切に区切られず、[/,]も同様です。

powerpoint for Macでのバグなのか、私のソースコードがおかしいのか、正直マクロを組むのが初めてなので、つまづいてしまいました。
ご助言、よろしくお願いします。

該当のソースコード

Sub saveAsPng()

    Dim filePath As String
    Dim fileName As String
    
    With ActivePresentation
    
        '保存場所
        filePath = .path
        
        'ファイル名
        fileName = Left(.Name, InStrRev(.Name, ".") - 1)
        
        Dim path As String
        path = filePath & ":" & fileName
        
        MsgBox path

        '指定の場所にファイルを保存
        .Export path, "PNG"
        
        MsgBox path
    End With
    
End Sub

試したこと

ここに問題に対して試したことを記載してください。

補足情報（FW/ツールのバージョンなど）

ここにより詳細な情報を記載してください。

Answer 1

区切り文字は"/"でいいはずです。
ピクチャフォルダ以外の場所（書類フォルダとか）で動かしても同じ挙動ですか？

＜追記＞
以下の記事にもあるように、セキュリティ的な理由でファイルを保存する場所に制約があるようです。
Mac ExcelVBAでPDF出力をする方法

Comments

[higashi110]

様々なフォルダで試してみたところ、

実行時エラー'-2147467259':
Presentation(unknown number):エクスポート時に、複数のディレクトリを作成することはできません。

と出ます。

/Users/Username/000
ここの階層しかセキュリティ上無理なんでしょうかね

Answer 2

まずは
Debug.Print Application.PathSeparator
としてパス区切り文字を確認してみてはいかがでしょう。

「ピクチャ」は「Picture」で正解です。
Picutreがピクチャフォルダに設定されているからです。

パワーポイントではPathSeparatorはありませんでした。失礼しました。
参照設定で「Microsoft Excel xx Object Library」にチェックを入れて
下記を実行していただければパス区切り文字の確認ができます。

Sub GetPathSeparator()

Dim app As Excel.Application
Set app = New Excel.Application

Debug.Print app.PathSeparator

End Sub

Comments

[higashi110]

回答ありがとうございます。

Application.PathSeparatorを使おうとすると、予測変換にまず候補がないのですが、直書きした場合、以下のようなエラーが出ます。

使っているエディターは標準のパワーポイントのマクロから編集しているのですが・・・。

コンパイル エラーです。:

メソッドまたはデータ メンバーが見つかりません。

[higashi110]

改めて回答ありがとうございます。

このPathSeparatorで確認、またそれらを使いたいのですが、以下のようなエラーが出ます。

ライブラリは有効にしています。

調べてもこのエラーコードの解決策の情報があまり出てこず、かなり長時間格闘していますが、解決できませんでした。

エラーコード
=============================================
実行時エラー'430':

クラスはオートメーションをサポートしていないか、または必要なインターフェイスをサポートしていません。
=============================================

[radames1000]

今はWindowsの環境でしか確認できていないので、
もしかたら異なる方法が必要なのかもしれません。
申し訳ないです。

[higashi110]

すみません、ありがとうございました
多分、Powerpoint for Macがかなり曲者らしいです。

[radames1000]

ActivePresentation.FullNameを確認していただけたらフルパスが出るので
区切り文字が明確になりそうです。（Windowsで確認ですが）