SolidWorks VBAの極致：アセンブリ初期化の「揺らぎ」を封じ込めるアーキテクチャ設計
SolidWorksの自動化において、最も初歩的でありながら、多くのエンジニアが「泥沼」に足を踏み入れる箇所がある。それが「新規アセンブリのテンプレート適用」だ。
「`NewDocument`を叩けばいい」と安易に考えているならば、それはまだAPIの表面しか見ていない。現場で発生する「単位系の不一致」「カスタムプロパティの欠落」「ファイルパスの依存関係による爆発」といったトラブルは、すべてこの初期化の甘さが原因である。
本稿では、レガシーなVBA環境下であっても、堅牢かつシステム連携を見据えた「アセンブリ初期化の作法」を伝授する。
—
1. なぜ「既定のテンプレート」ではいけないのか
多くの現場では、SolidWorksの「システムオプション」で指定したデフォルトテンプレートに依存している。だが、これは大規模開発や複数拠点間での運用において「最大の脆弱性」となる。
エンジニアのPC環境が変われば、参照先パスがズレる。あるいは、WindowsアップデートやOSの再インストールで設定が初期化される。システム管理の観点から言えば、「実行時にテンプレートパスをコード内で動的に制御（Inject）できない自動化システムは、自動化とは呼べない」。
2. 堅牢なアセンブリ初期化の設計指針
SolidWorks APIにおける `ISldWorks::NewDocument` は、単なるファイル作成ではない。メモリ上に新たなドキュメントコンテキストを生成する重い処理だ。ここで重要なのは、以下の3点である。
1. 絶対パスの事前検証: ファイルが存在しない場合に例外を投げさせるのではなく、コード側で `Dir()` 関数を使い、実行前に検証を行う。
2. オブジェクトのライフサイクル管理: 生成した `IModelDoc2` をスコープ終了時に明示的に解放する。
3. テンプレートの強制適用: システム設定に依存せず、常に最新の社内規格（.asmdot）を参照する。
—
3. 実践：厳密なテンプレート適用によるアセンブリ生成コード
以下のコードは、単に新規ファイルを作るだけではない。エラーハンドリングとメモリ最適化を考慮した、プロダクション品質のコードである。
Option Explicit
‘ メイン処理：社内標準テンプレートを用いた安全なアセンブリ生成
Public Sub CreateStandardAssembly()
Dim swApp As SldWorks.SldWorks
Dim swModel As SldWorks.ModelDoc2
Dim templatePath As String
‘ SolidWorksオブジェクトの取得（既存インスタンスへの接続）
Set swApp = Application.SldWorks
‘ 社内標準テンプレートのフルパス（システム設定に依存しない）
templatePath = “C:\CompanyStandards\Templates\Standard_Assembly.asmdot”
‘ テンプレートの存在確認（例外を未然に防ぐ）
If Dir(templatePath) = “” Then
MsgBox “エラー: 標準テンプレートが見つかりません。” & vbCrLf & templatePath, vbCritical
Exit Sub
End If
‘ アセンブリの生成
‘ swDocASSEMBLY = 2
‘ swDwgPaperUndefined = 0
Set swModel = swApp.NewDocument(templatePath, 0, 0, 0)
‘ モデルの検証
If swModel Is Nothing Then
MsgBox “ドキュメントの生成に失敗しました。”, vbExclamation
Exit Sub
End If
‘ 必要に応じてプロパティの初期化や単位系の強制設定を行う
‘ Call InitializeCustomProperties(swModel)
‘ メモリ最適化：不要な参照をクリア
Set swModel = Nothing
Set swApp = Nothing
End Sub
—
4. シニアエンジニアが意識すべき「メモリの重み」
VBAはガベージコレクションが強力ではない。`NewDocument` を何度も繰り返すようなバッチ処理を組む場合、`Set swModel = Nothing` を疎かにすると、SolidWorksのプロセスが肥大化し、メモリリークを引き起こす。
特に、「バックグラウンドでアセンブリを次々と生成して、プロパティを流し込む」ような自動化ツールの場合、以下の作法を徹底せよ。
- ドキュメントの閉鎖: `swApp.CloseDoc(swModel.GetTitle)` を必ず呼び出す。
- イベントの監視: `swApp_FileNewNotify` などのイベントと連動させ、不正なテンプレートによるドキュメント生成を検知・破棄するバックエンド層を構築する。
5. 結論：環境に依存しない「強固な土台」を
初心者は「動くコード」を書くことに執着する。しかし、アーキテクトは「壊れないシステム」を設計する。
今回紹介したテンプレート指定の強制適用は、アセンブリ自動化における最初の一歩に過ぎない。しかし、ここを「環境設定任せ」にしている限り、あなたのシステムは一生「誰かのPCでは動かない」という呪縛から逃れられない。
コード内に設定を刻み込み、物理パスを握る。この小さな徹底こそが、大規模なエンジニアリング・オートメーションを実現するための唯一の正攻法だ。
次は、生成したアセンブリに対して「合致（Mate）をプログラムから定義する際、いかにして再ビルドのコストを最小化するか」という深淵に触れるとしよう。期待しておけ。
