この記事はこのような人に向けて書いています。
- VBAでiCAD用ツールを作れるようになりたい人
- 自作ツールを作って職場で自慢したい人
こんにちは。ゆー です。
このページでは私が自作したiCAD向けVBAライブラリを配布しています。
活用方法はこちらの記事をご参照ください。
ダウンロードリンク
下記リンクよりダウンロードしてください。
解凍すると以下のファイルが入っています。
ライブラリファイル一覧
- ICAD_Control.bas
- ICAD_Drawing.bas
- ICAD_2Dto3D.bas
- ICAD_3D_Edit.bas
- ICAD_2D_MoveCopy.bas
ライブラリの内容
それぞれのライブラリに含まれているコードの一覧です。
ICAD_Contorol.bas
「iCADの起動確認」「2D画面への以降」「画面の全表示」など、iCADの操作全般
| 関数名 | 機能 |
|---|---|
| IsICADActive | iCADが起動中かチェックする |
| CreateICADWindow | iCAD内の新規ウィンドウを作成して作業をする準備を行う |
| ActivateICAD2DView | アクティブウィンドウを2D画面に切り替える |
| ActivateICAD3DView | アクティブウィンドウを3D画面に切り替える |
| SetICADEntireView | 全体表示する |
| SetICADDisplayDirection | 指定した方向に表示を変更する（3D) |
| ChooseICADView | 指定したビューをアクティブにする（2D） |
| SaveICADFileAs | 名前をつけて保存する |
| PlaceICADPart | 保存されているパーツからパーツ配置する |
| CloseICADWindowNoSave | アクティブウィンドウを保存せずに閉じる |
| ChangeICADLinePattern | システムの線種を変更する |
| EnableICADSearchAll | すべての検索要素をONにする（作図要素、製図要素、立体要素、線種、線幅、カラー、レイヤー） |
| EnableICADSearchElement | 検索要素（作図要素、製図要素、立体要素）を一つだけに設定する |
| EnableICADSearchLinePattern | 検索線幅、線種を設定する |
| EnableICADSearchColor | 検索要素カラーを設定する |
| EnableICADSearchLayer | 検索要素レイヤーを設定する |
| ShowICADAllLayers | すべてのレイヤーを表示にする |
| ShowICADOnlyLayers | 指定したレイヤーのみ表示にする |
| EnableICADCrossSelection | クロス選択をONにする |
| DisableICADCrossSelection | クロス選択をOFFにする |
ICAD_Drawing.bas
「直線の作成」「円の作成」「矩形の作成」など、2D図形の作図
| 関数名 | 機能 |
|---|---|
| DrawLine_Between | 2点間を結ぶ直線（有限）を作成する |
| DrawLine_Infinite | 2点間を通る直線（無限）を作成する |
| DrawLine_Horizontal | 水平線（無限）を作成する |
| DrawLine_Vertical | 垂直線（無限）を作成する |
| DrawCircle | 円を作図する |
| DrawRectangle | 水平垂直の矩形を作図する |
ICAD_2Dto3D_Creation.bas
「垂直投影」「回転投影」など2D→3Dコマンド
| 関数名 | 機能 |
|---|---|
| CreateDimensionWindow | 2D→3Dコマンド前の三次元ウィンドウを作成する |
| Create2D3DVertical | [2D→3Dコマンド]垂直投影を作成する |
| Create2D3DRotation | [2D→3Dコマンド]回転投影を作成する |
| Create2D3DSpiral | [2D→3Dコマンド]らせん形状を作成する |
ICAD_3D_Edit.bas
「集合演算」「切断」などの3Dモデル編集全般
| 関数名 | 機能 |
|---|---|
| PerformUnionOperation | 集合演算（和）をする |
| PerformDifferenceOperation | 集合演算（差）をする |
| PerformIntersectionOperation | 集合演算（積）をする |
| TrimByPlane | 指定した平面（XY、YZ、ZX）でトリムする |
| SolidifyObject | ソリッド化する |
ICAD_2D_MoveCopy.bas
「集合演算」「切断」などの3Dモデル編集全般
| 関数名 | 機能 |
|---|---|
| Move2D_Sidebyside | 2D平行移動をする |
| Move2D_Rotation | 2D回転移動をする |
| Move2D_Mirror | 2Dミラー移動をする |
| Copy2D_Sidebyside | 2D平行コピーをする |
| Copy2D_Rotation | 2D回転コピーをする |
| Copy2D_Mirror | 2Dミラーコピーをする |
本記事で掲載している画像の特記事項
本ブログ記事に掲載しているiCADの画像についての注意事項です。
- iCADは、富士通株式会社の登録商標です
- iCAD SXの著作権は、iCAD株式会社が保有します
- 当ブログでは、iCAD株式会社の許諾を得て画面等を表示しています
- 当ブログの内容について、無断で使用、複製することを禁じます