FC2ブログ

AutoCAD作図支援

AutoCAD(Diesel)とExcel(VBA)の複合マクロ

Jun 05-2019

未分類





スポンサーサイト

▲PageTop

概要:GridMesh作成アプリ

GridMesh作成

AutoCADLTとExcel を使用して、2D等高線から簡易的に「現況地形」のGrid(1mx1m)Meshデータを作成
     ExcelVBアプリケーション(以下「Excel アプリ」という)とAutoCADLTマクロ(以下「Diesel」 という)
     を使用した複合アプリを紹介します。

【2D等高線図】

※赤枠点線・・・解析範囲

         
    ポリライン化された等高線をすべて選択
         
    ポリライン情報をExcelマクロで解析処理 
         

Grid(1mx1m) Meshデータを csv ファイルに出力  (※左から X , Y , Z )


(中略)




GridMeshデータを使用した出力例
       拡張機能:(その1)任意切断面概略作図
       拡張機能:(その2)3D等高線図作成
       拡張機能:(その3)3Dワイヤメッシュ図作成
       拡張機能:(その4)図上任意点の座標値(x,y,z)取得

アプリケーションの操作方法方法については、
      操作マニュアル/チュートリアル:GridMeshデータ
参照願います。


▲PageTop

Grid の考え方について

GridMesh作成

等高線図(2D)にGridを設定

             
 1m Grid ( 1m x 1m )

 2m Grid ( 2m x 2m )

 5m Grid ( 5m x 5m )
             
等高線の線形を解析し、Grid格子点(丸印)の3D座標値(x,y,z)を算出




▲PageTop

メカニズム:(その1)ポリライン情報取得

GridMesh作成

AutoCADオブジェクト情報(Listコマンド)で、ポリライン情報を取得
          
ポリラインを構成する直線の格点座標値が点列表示されます。

          

          
すべてのポリライン(等高線)に対して、Excelアプリによる解析処理を行います。
          

          
ポリライン格点(折れ点)の3D座標(x,y,z)の取得が完了。





▲PageTop

メカニズム:(その2)ポリライン直線要素の方程式取得

GridMesh作成

複数の直線で構成される等高線は、直線と同数の方程式を有します。

「メカニズム:(その1)」で求めた連続する直線の座標値(x,y)から、それぞれの方程式を求めます。

直線の方程式の算定方法については、
       【 備忘録 】二点を通る直線の方程式(Ax+By+C=0)
参照願います。
      
Excel アプリによる直線の方程式算出結果



▲PageTop

メカニズム:(その3)ポリラインとGrid軸との交点座標解析

GridMesh作成

「メカニズム:(その2)」で求めた直線の方程式とGrid軸(X軸/Y軸)との交点座標を求めます。


【拡大図】


ポリラインとGrid軸との交点座標(x,y)の算定方法については、
       【 備忘録 】直線上にある任意点の座標(x,y)
       【 備忘録 】二直線の交点座標(x,y)
参照願います。




▲PageTop

メカニズム:(その4)Grid格子点の標高値Z解析

GridMesh作成

Grid格子点と、それを挟む「メカニズム:(その3)」で求めた交点(x,y,z)から、
X軸/Y軸について比例配分により高さを割り出し、その平均値をGrid格子点の標高値Zとする。
すべての格子点について当該解析を行う。
  ※等高線間の高さは一様に分布していると考える(必要条件)

      
解析結果 (csv ファイルで出力)









▲PageTop

メカニズム:(その5)Grid内任意点の標高値Z解析

GridMesh作成

Grid内の高さは一様に分布していると考え、下記の図式から、比例配分により任意点の高さZを求める。






▲PageTop

拡張機能:(その1)任意切断面概略作図

GridMesh作成

解析範囲(赤枠点線)内の任意の切断線に対して、概略切断面図を作成します。

                    ExcelアプリとDiesel による自動作図




アプリケーションの操作方法方法については、
      操作マニュアル/チュートリアル:GridMeshデータ
参照願います。



▲PageTop

拡張機能:(その2)等高線3D復元作成

GridMesh作成

2D等高線に高さZを与えて、3D復元します。
Excel アプリとDiesel でスクリプトファイルを作成し、自動作図します。

南西アイソメビュー


南東アイソメビュー


北東アイソメビュー


北西アイソメビュー


▲PageTop

Menu

最新記事一覧

検索フォーム