PowerPoint VBAでファイルパスを取得する方法【初心者向け解決ガイド】

2025.10.07

PowerPointで資料を作成しているとき、「今開いているファイルの保存場所ってどこだろう？」と疑問に思ったことはありませんか？特に、VBA（マクロ）を使って自動化を進めていると、ファイルのパスを取得する場面が増えてきます。

この記事では、PowerPoint VBAを使って、現在開いているプレゼンテーションの保存場所（パス）を簡単に取得する方法を、初心者の方にもわかりやすく解説します。

PowerPoint VBAでファイルパスを取得する基本の方法

PowerPointのイメージ

まずは、最も基本的な方法からご紹介します。

現在開いているプレゼンテーションの保存場所を取得するには、以下のコードを使用します。

Dim filePath As String

filePath = ActivePresentation.Path

このコードを実行すると、`filePath`変数に保存されているフォルダのパスが格納されます。

ただし、注意点があります。もしプレゼンテーションがまだ保存されていない場合、`ActivePresentation.Path`は空の文字列（””）を返します。保存されていない状態でこのコードを実行すると、何も取得できないことになります。

保存されていないプレゼンテーションのパスを取得したい場合、`ActivePresentation.FullName`を使用します。これにより、ファイル名を含むフルパスが取得できます。

Dim fullPath As String

fullPath = ActivePresentation.FullName

これで、保存されていない場合でもファイルの場所を把握できます。

保存されていない場合に、ユーザーに保存を促すメッセージを表示するなどの処理を追加することも可能です。

Dim filePath As String

filePath = ActivePresentation.Path

If filePath = "" Then MsgBox "このプレゼンテーションはまだ保存されていません。保存してください。", vbExclamation Else MsgBox "保存場所: " & filePath, vbInformation End If

このように、状況に応じて適切な対応をすることで、よりユーザーフレンドリーなVBAコードを作成できます。

はい、あります。`ActivePresentation.FullName`を使用することで、保存されていないプレゼンテーションのフルパスを取得できます。

取得したファイルパスは、他のファイルを開く際の参照や、ファイルの保存先を指定する際など、さまざまな場面で活用できます。

まずは、VBAエディタを開いて、上記のコードを試してみてください。実際に手を動かすことで、理解が深まります。

いま、あなたを悩ませているITの問題を解決します！
「エラーメッセージ、フリーズ、接続不良…もうイライラしない！」

あなたはこんな経験はありませんか？

✅ ExcelやWordの使い方がわからない💦
✅ 仕事の締め切り直前にパソコンがフリーズ💦
✅ 家族との大切な写真が突然見られなくなった💦
✅ オンライン会議に参加できずに焦った💦
✅ スマホの重くて重要な連絡ができなかった💦

平均的な人は、こうしたパソコンやスマホ関連の問題で年間73時間（約9日分の働く時間！）を無駄にしています。あなたの大切な時間が今この悩んでいる瞬間も失われています。

LINEでメッセージを送れば即時解決！

すでに多くの方が私の公式LINEからお悩みを解決しています。

最新のAIを使った自動応答機能を活用していますので、24時間いつでも即返信いたします。

誰でも無料で使えますので、安心して使えます。

問題は先のばしにするほど深刻化します。

小さなエラーがデータ消失や重大なシステム障害につながることも。解決できずに大切な機会を逃すリスクは、あなたが思う以上に高いのです。

あなたが今困っていて、すぐにでも解決したいのであれば下のボタンをクリックして、LINEからあなたのお困りごとを送って下さい。

ぜひ、あなたの悩みを私に解決させてください。

PowerPoint VBAでファイルパスを取得する方法は、意外とシンプルです。最初は難しく感じるかもしれませんが、少しずつ試していくことで、VBAの世界が広がります。

他にも疑問やお悩み事があれば、お気軽にLINEからお声掛けください。