【テクニカル・上級編】【初心者向け】図面保存時の「FullName」プロパティの罠：パス未設定の新規図面を安全に保存する条件分岐 – AutoCAD VBA解析バイブル

FullNameプロパティの深淵：未保存図面におけるオブジェクト・ステートの掌握

AutoCADの自動化において、多くの開発者が「動けば良い」という思考停止に陥り、致命的なランタイムエラーを量産する。その典型的な例が、図面保存処理における`FullName`プロパティの扱いの誤りだ。

本稿では、単なる「エラー回避術」ではない。AutoCADオブジェクトモデルのライフサイクル、メモリ管理、そしてファイルシステムとの境界線において、エンジニアがどのように「状態（State）」を制御すべきか、その極限の知見を記述する。

1. 根源的な問題：名前なきオブジェクトの不在

AutoCAD VBAにおいて、`AcadDocument`オブジェクトの`FullName`プロパティは、単なる文字列の保持ではない。それは、そのオブジェクトがファイルシステム上の物理的な実体と紐付いているかを示す、唯一のステータス・インジケータである。

新規図面（`New`コマンドによって生成された直後の図面）において、`FullName`は空文字列（`””`）を返す。この「名前を持たない」状態のオブジェクトに対して`.Save`メソッドを呼び出すことは、宛先のない通信を試みるに等しい。結果、プログラムは無慈悲なランタイムエラーを吐き出し、システムは停止する。

シニアエンジニアが設計すべきなのは、単なる`If`文ではない。「図面のアイデンティティが確定しているか」を判定するガード・ロジックである。

2. 実装の真髄：堅牢な保存ロジックの構築

プロフェッショナルのコードは、常に「最悪のシナリオ」を想定して分岐する。保存処理において考慮すべきは、以下の3つの状態だ。

1. 未保存状態（New Drawing）: `FullName`が空。`SaveAs`が必須。
2. 既存保存状態（Existing Drawing）: `FullName`が存在。`Save`で完結。
3. ファイル競合状態（File Conflict）: 保存先に同名ファイルが存在。上書き確認のハンドリングが必要。

以下に、これらを極限まで最適化した実装例を示す。

''
' @description 図面を安全に保存する。未保存図面の場合はSaveAsを、
'              既存図面の場合はSaveを適切に選択し、例外を制御する。
' @param doc Current AutoCAD Document object
' @param targetPath The desired absolute path (Required for new drawings)
' @return Boolean Success or failure
''
Public Function SafeSaveDocument(ByVal doc As AcadDocument, ByVal targetPath As String) As Boolean
    On Error GoTo ErrorHandler
    
    ' 1. オブジェクトの有効性検証
    If doc Is Nothing Then
        Err.Raise vbObjectError + 513, "SafeSaveDocument", "Invalid Document Object."
    End If

    ' 2. ステート判定：FullNameが空か否かで、SaveかSaveAsかを分岐
    ' FullNameが空の場合、その図面はファイルシステム上に実体を持たない「浮遊状態」である
    If doc.FullName = "" Then
        ' 未保存図面の場合、パスの妥当性を検証し、SaveAsを実行
        If targetPath = "" Then
            Err.Raise vbObjectError + 514, "SafeSaveDocument", "Target path is required for unsaved drawings."
        End If
        
        ' パスのディレクトリが存在するか、OSレベルで確認することを推奨（FileSystemObject等を利用）
        ' ここではAutoCADのSaveAsメソッドを呼び出す
        doc.SaveAs targetPath
    Else
        ' 既に保存済みの図面の場合、単純なSaveを実行
        ' ただし、同名ファイルが存在する場合の挙動はAutoCADの設定に依存するため注意が必要
        doc.Save
    End If

    SafeSaveDocument = True
    Exit Function

ErrorHandler:
    ' ログ出力やシステム管理者への通知ロジックをここに集約
    Debug.Print "Critical Error in SafeSaveDocument: " & Err.Description
    SafeSaveDocument = False
    ' オブジェクトのライフサイクルを汚染しないよう、エラー時も適切に処理を抜ける
End Function

3. アーキテクトの視点：メモリ最適化とレガシー環境の保守

大規模なバッチ処理や、数百のDWGファイルをスキャンするシステムを構築する場合、コードの美しさよりも「リソースの管理」が優先される。

オブジェクトの明示的解放

VBAのガベージコレクションは、C++や.NETほど厳密ではない。ループ内で`AcadDocument`を大量に生成・操作する場合、`Set doc = Nothing`による明示的な参照解除を怠れば、メモリリークを引き起こし、最終的にAutoCADのプロセス自体がクラッシュする。

Windows APIによるパスの事前検証

`SaveAs`を呼び出す前に、Windows API（`Kernel32.dll`の`GetFileAttributes`等）または`FileSystemObject`を用いて、保存先ディレクトリの書き込み権限や存在を確認すべきだ。AutoCAD内部の例外処理に頼るのではなく、OSレイヤーで事前にガードを固めるのが、堅牢なシステム設計の鉄則である。

バージョン互換性の制御

`SaveAs`メソッドを使用する際、引数としてファイル形式を指定できる。レガシーな環境（AutoCAD 2010等）と連携するシステムでは、最新のDWG形式で保存してしまい、後続のプロセスが読み込めないという事故が頻発する。
`SaveAs`の第2引数（ファイル形式）を明示的に指定し、システムの要件に合わせた「バージョン・コントロール」をコードレベルで強制せよ。

結論

`FullName`プロパティの罠は、単なる文法ミスではない。それは「オブジェクトが持つ内部状態と、外部ファイルシステムの同期」という、コンピュータサイエンスにおける根源的な課題の現れである。

エンジニアが目指すべきは、エラーが出ないコードを書くことではない。オブジェクトのライフサイクルを完全に理解し、いかなる状態（State）においても予測可能な挙動を保証するロジックを設計することである。

それが、伝説的なアーキテクトへの第一歩となる。