こんにちは！PowerPoint VBAの世界へようこそ。
マクロの記録から一歩踏み出し、「自分でコードを書いて業務を自動化したい！」という素晴らしい挑戦を始めているあなたへ、今日は現場のプロが最初に必ずつまずく「隠れた落とし穴」と、それを華麗に回避するスマートなテクニックをお伝えします。
ここをクリアすれば、PowerPointのオブジェクトモデルの機微がグッと理解できるようになりますよ。それでは、肩の力を抜いて一緒に見ていきましょう！
—
1. 誰もが通る道：`FullName` の甘い罠
PowerPointで作業をしているとき、「いま開いているファイルの保存場所や名前を使いたいな」と思うことはありませんか？
そんなとき、VBAでは `Presentation` オブジェクト（今開いているプレゼンテーション）が持つ `FullName` や `Path` というプロパティを使います。
- `Path` ：ファイルが保存されているフォルダのパス（例：`C:\Documents`）
- `FullName`：フォルダのパス ＋ ファイル名（例：`C:\Documents\report.pptx`）
これらをコードに書くのはとても簡単です。例えば、こんな風に書きます。
Sub ShowFilePath()
‘ 現在のファイルのフルパスを表示する
MsgBox ActivePresentation.FullName
End Sub
「おっ、簡単じゃん！」と思いましたよね？
しかし、たった一つの状況において、このコードは無慈悲にもエラーを吐き出して停止します。その状況とは……そう、「まだ一度も名前を付けて保存していない、新規のプレゼンテーション」のときです。
未保存のファイルで起きる悲劇
PowerPointを起動して「新しいプレゼンテーション」を開いた直後、ファイルにはまだ実体がありません。OS上にファイルが存在しないため、`Path` や `FullName` は「空っぽ（長さ0の文字列）」の状態になっています。
この状態で先ほどのコードを実行すると、VBAはパニックを起こし、以下のような実行時エラー（エラー番号：-2147188160 など）で強制終了してしまいます。
> 実行時エラー ‘-2147188160 (800401a0)’:
> 指定されたファイルが見つかりません。
自動化ツールを作ったはいいものの、ユーザーがうっかり新規ファイルのままマクロを実行してエラー落ちしてしまう……これは実務において絶対に避けたい事態ですよね。
—
2. なぜエラーになるのか？（オブジェクトのライフサイクル）
プログラミングの世界では、オブジェクトの「状態」を意識することが非常に重要です。
PowerPointの `Presentation` オブジェクトが誕生してから消滅するまでのライフサイクルにおいて、「保存（Save）」というイベントが起きるまで、ファイルパスは確定しないという大原則があります。
初心者の方は「ファイルを開いているんだから、パスがあるはずだ」と思いがちですが、メモリ上だけで生きている「名無しの権兵衛」状態のファイルには、住所（Path）が存在しないのです。住所がない人に手紙を出そうとしてもエラーになるのと同じですね。
—
3. 解決策：空白チェックによるスマートな条件分岐
この問題を解決するのは非常にシンプルです。
「パスが存在するかどうか（空っぽではないか）」を、アクセスする前に判定（ガード）してあげればいいのです。
VBAには、文字列が空かどうかを判定する便利な関数があります。それを使った「安全なファイル判定ロジック」を見てみましょう。
実用的な安全コード
Sub SafeGetFilePath()
Dim targetPres As Presentation
Set targetPres = ActivePresentation
‘ 【重要】Pathプロパティが空（””）かどうかをチェックする
If targetPres.Path = “” Then
‘ — 未保存の場合の処理 —
MsgBox “このファイルはまだ保存されていません！” & vbCrLf & _
“一度保存してから再度マクロを実行してください。”, _
vbExclamation, “未保存ファイルのエラー”
Exit Sub ‘ ここで処理を安全に終了
End If
‘ — 保存済みの場合の処理（安心してFullNameを使える） —
MsgBox “ファイルの場所はこちらです：” & vbCrLf & targetPres.FullName, _
vbInformation, “ファイルパス確認”
‘ ここに本来やりたかった処理を記述する
‘ 例：同じフォルダ内にPDFを書き出す、など
End Sub
コードのポイント解説
1. `targetPres.Path = “”` の判定
未保存のファイルの場合、`Path` プロパティは長さ0の文字列（`””`）を返します。これを利用して、条件分岐のガードを作ります。
2. `Exit Sub` による早期リターン
条件に引っかかった（＝未保存だった）場合は、メッセージを出して即座に処理を終了（`Exit Sub`）させます。これにより、後続の危険な処理にコードが到達するのを防ぎます。
3. 安全地帯での処理
`If` のガードを無事に突破したファイルは、「必ずディスク上に保存されている」ことが保証されます。そのため、心置きなく `FullName` や `Path` を使った高度な処理を記述できます。
—
4. プロのエンジニアからのワンポイントアドバイス
実務でVBAを書くときは、「正常系（うまく動くとき）」だけでなく、「異常系（ユーザーが変な操作をしたとき）」にどう振る舞うかを考えることが、プロとアマを分ける境界線になります。
今回紹介した「パスの空白チェック」は、PowerPointだけでなく、Excel VBA (`Workbook.Path`) でもそのまま使える非常に強力なテクニックです。
「マクロの記録」を卒業し、自分の手で堅牢（ロバスト）な自動化ツールを作っていく上で、この「未保存チェックのガード節」はあなたの強力な武器になるはずです。
ここをクリアしたあなたなら、もうPowerPoint VBAの基本はバッチリです！
ぜひ明日からの開発にこの知見を取り入れて、スマートでエラーに強いコードを書いてみてくださいね。応援しています！
