【SolidWorks API】図面レイヤーを「マクロ一発」で統制せよ：ILayerManagerによる製図品質の完全自動化
こんにちは。現場で「なぜか図面ごとに線色がバラバラだ」「修正のたびに画層設定をやり直している」という悩みを抱えていませんか？
製図とは、設計者の意図を相手に伝えるための「言語」です。その言語のルール（画層設定）が揺らいでいては、図面の信頼性は地に落ちます。今日は、「マクロの記録」から卒業し、SolidWorksの深い階層である`ILayerManager`を直接叩くことで、一瞬で図面規格を統一する極意を伝授します。
—
1. なぜ「手動設定」ではいけないのか？
SolidWorksのGUIで画層を一つずつ設定するのは、プロの設計者にとって最も避けるべき「無駄な作業」です。
- ヒューマンエラー: 色番号や線種の選択ミスが後を絶たない。
- 工数の浪費: 100図面あれば、それだけで数時間の損失です。
- 規格の不一致: プロジェクトメンバー間で設定が異なると、図面の一貫性が崩壊します。
今回扱う`ILayerManager`は、SolidWorksの図面ドキュメント内に存在する「画層の管理者」です。これを使えば、プログラムが図面を開いた瞬間、社内基準に準拠したレイヤー構成を自動生成し、強制的に割り当てることが可能になります。
—
2. 核心オブジェクト：SldWorksとModelDoc2
SolidWorks APIを操るには、まずこの2つの階層構造を理解してください。
1. SldWorks (最上位): アプリケーション全体を司る親。
2. ModelDoc2 (アクティブドキュメント): 現在開いている図面（DrawingDoc）を指す抽象オブジェクト。
まずは、現在開いている図面を正しくキャッチすることが第一歩です。
—
3. 実践：レイヤー一括生成・設定プログラム
以下のコードは、指定した名前のレイヤーが存在しなければ作成し、存在すれば設定を上書きする、いわば「強制統制型」のスクリプトです。
Option Explicit
‘ 伝説のエンジニアへの第一歩：ILayerManagerを操る
Sub ManageDrawingLayers()
Dim swApp As SldWorks.SldWorks
Dim swModel As SldWorks.ModelDoc2
Dim swLayerMgr As SldWorks.LayerManager
‘ SolidWorksに接続
Set swApp = Application.SldWorks
Set swModel = swApp.ActiveDoc
‘ 図面以外なら即座に終了（安全装置）
If swModel Is Nothing Or swModel.GetType <> swDocDRAWING Then
MsgBox “図面ドキュメントを開いてください。”
Exit Sub
End If
‘ レイヤーマネージャーを取得
Set swLayerMgr = swModel.GetLayerManager
‘ ここで画層を定義（名前, 色(RGB), 線種, 太さ）
‘ 0:細線(中心線), 1:太線(外形線), 2:隠れ線
Call CreateOrUpdateLayer(swLayerMgr, “CenterLine”, RGB(255, 0, 0), swLineNoStyle, swLW_THIN)
Call CreateOrUpdateLayer(swLayerMgr, “VisibleLines”, RGB(0, 0, 0), swLineNoStyle, swLW_THICK)
MsgBox “図面レイヤーの統制が完了しました。”
End Sub
‘ レイヤー設定を自動化するヘルパー関数
Sub CreateOrUpdateLayer(mgr As SldWorks.LayerManager, name As String, color As Long, style As Long, weight As Long)
Dim swLayer As SldWorks.Layer
‘ レイヤーが存在するか確認
Set swLayer = mgr.GetLayer(name)
If swLayer Is Nothing Then
‘ なければ新規作成
mgr.AddLayer name, “自動生成レイヤー”, color, style, weight
Else
‘ あれば設定を強制上書き
swLayer.Color = color
swLayer.Style = style
swLayer.SetWidth weight
End If
End Sub
—
4. 陥りやすい罠：初学者が必ず通る道
① 「型」の不一致エラー
SolidWorks APIは厳格です。`swModel`が図面ドキュメントでない状態で`GetLayerManager`を呼ぶと、プログラムは即座にクラッシュします。必ず`GetType`でドキュメントタイプを検証する習慣をつけましょう。
② 線種の指定（swLineNoStyleなど）
`swLineNoStyle`や`swLW_THICK`などはAPIで定義された定数です。これらは「列挙型（Enum）」と呼ばれ、数値を直接入力するのではなく、必ずAPIが用意している定数名を使ってください。これによりコードの可読性が飛躍的に向上します。
③ レイヤー名の大文字・小文字
SolidWorksのレイヤー名は、内部的に大文字・小文字を区別しないことが多いですが、管理上は常に一定の命名規則（例: “JIS_CENTER”など）を守ることで、後の検索や修正が非常に楽になります。
—
5. 最後に：プロの自動化エンジニアを目指すあなたへ
今回のコードは、ほんの入り口に過ぎません。この技術を応用すれば、
- 図面枠の自動挿入
- 特定の寸法スタイルの一括変更
- 図面チェックリストの自動出力
など、あなたの製図業務を劇的に変える武器になります。
「マクロの記録」はあくまで機能の確認用です。そこからオブジェクトモデルという「地図」を読み解き、直接命令を出す。この感覚を掴めば、あなたはもう初学者ではありません。
自信を持って、次の自動化へ踏み出してください。行き詰まったら、いつでも戻ってきてくださいね。あなたのコードが、現場の品質を支える最強のツールになることを願っています。
