SolidWorks APIの深淵：アセンブリ自動生成と「無駄を削ぎ落とす」メモリ管理の流儀
SolidWorksの自動化を志す多くのエンジニアが陥る罠がある。それは「マクロの記録」から生成された冗長なコードを鵜呑みにし、メモリリークを放置したままの「使い捨てスクリプト」を量産することだ。
真に堅牢な自動化システムは、単に動くだけではない。SolidWorksのメモリ空間を掌握し、APIの挙動を予測し、OSのリソースを枯渇させない。今日は、アセンブリの新規作成という最も基礎的なタスクを通じ、我々が守るべき「極限の設計思想」を伝授する。
—
1. 勘違いを排せ：なぜ `NewDocument` を使うのか
SolidWorks APIにおいて、アセンブリを生成する際に最も避けるべきは「テンプレートファイルを手動で読み込もうとする」行為だ。パスのハードコーディングは保守性を殺す。
`ISldWorks::NewDocument` を使用し、レジストリや設定ファイルからテンプレートパスを取得するのがシニアの流儀である。
‘ 伝説的なチーフアーキテクトが推奨する、アセンブリ生成の骨子
Public Sub CreateAssemblyProperly()
Dim swApp As SldWorks.SldWorks
Dim swModel As SldWorks.ModelDoc2
Dim templatePath As String
Set swApp = Application.SldWorks
‘ テンプレートパスは環境依存を排除するためGetUserPreferenceで取得する
templatePath = swApp.GetUserPreferenceStringValue(swUserPreferenceStringValue_e.swDefaultTemplateAssembly)
‘ アセンブリ生成：引数は (テンプレート, 単位, 精度) 0はデフォルト値
Set swModel = swApp.NewDocument(templatePath, 0, 0, 0)
If swModel Is Nothing Then
Err.Raise vbError, “Automation”, “ドキュメント生成に失敗しました。”
End If
‘ ここでプロパティ設定へ移行する
SetupDocumentProperties swModel
‘ オブジェクトの解放は「儀式」ではなく「生存戦略」
Set swModel = Nothing
Set swApp = Nothing
End Sub
—
2. メモリ最適化と「Dispose」の精神
VBAはガベージコレクションをOS任せにする。しかし、SolidWorksのComObjectは、参照を解除しない限りメモリに残り続ける。「なんとなく動く」コードを書く初心者は、ここを放置する。
- 明示的な `Nothing` の代入: スコープを抜ける前に必ず参照をクリアせよ。
- Windows APIの活用: 処理に時間がかかる場合、`DoEvents`を乱用するのではなく、`Sleep`関数でCPUリソースを解放し、OS側の描画更新を待つのがプロのタスク管理だ。
‘ スレッドを占有させないためのWindows API呼び出し
If VBA7 Then
Private Declare PtrSafe Sub Sleep Lib “kernel32” (ByVal dwMilliseconds As Long)
Else
Private Declare Sub Sleep Lib “kernel32” (ByVal dwMilliseconds As Long)
End If
‘ 設定処理の一例：単位系をミリメートルへ強制固定
Private Sub SetupDocumentProperties(swModel As ModelDoc2)
‘ 単位設定: 0=mm, 1=inch, 2=meter… etc
swModel.SetUserPreferenceIntegerValue swUnitSystem_e.swUnitSystem_MMGS, swUnitSystem_e.swUnitSystem_MMGS
‘ 最後に処理を確定させるために描画更新を一度挟む
swModel.ViewZoomtofit2
Sleep 100 ‘ レンダリングエンジンへのバッファ時間を確保
End Sub
—
3. レガシー環境との対話：システム管理者の視点
社内環境では、古いSolidWorksバージョンと新しいバージョンが混在することがある。ここで重要なのは「Late Binding（遅延バインディング）」への理解だ。
もし貴方のコードが特定のバージョンに強く依存しているなら、それは将来の自分を縛る鎖となる。可能であれば、`Object`型を用いたインターフェースの抽象化を行い、環境差異を吸収するラッパーを一枚噛ませることを推奨する。
4. 現場のエンジニアへ送る「鉄の掟」
1. エラーハンドリングを怠るな: `On Error GoTo`は甘えではない。SolidWorksがクラッシュした際、どこで停止したかを記録するログ出力こそが、システム管理者の誇りである。
2. API仕様書を読み込め: 「マクロの記録」はあくまでヒントだ。`ISldWorks`と`IModelDoc2`のメソッド定義を暗記する勢いで、ドキュメントの「型」と「戻り値」を精査せよ。
3. 再利用性を担保せよ: 今回紹介したコードを「関数」として切り出せないなら、それはまだコードとは呼べない。
自動化は単なる作業の効率化ではない。それは、貴方の技術的な「思考の結晶」をコードに定着させ、生産性の限界を突破するための行為だ。
もしこのコードを適用し、パフォーマンスが劇的に向上したなら、それは貴方が「SolidWorksの流儀」を理解し始めた証拠である。次は、合致（Mate）の幾何学的拘束条件を動的に生成する、より高位な世界で会おう。
