Export メソッド(ActiveX)

AutoCAD 図面または保存された画層設定をファイルに書き出します。

サポートされているプラットフォーム: Windows のみ

構文と要素 - Document

VBA:

object.Export FileName, Extension, SelectionSet

object

タイプ: Document

このメソッドが適用されるオブジェクト。

FileName

アクセス: 入力のみ

タイプ: 文字列

新しく書き出されるファイルの名前。

Extension

アクセス: 入力のみ

タイプ: 文字列

この文字列には、図面の書き出し先ファイルの種類を指定する 3 文字を含める必要があります。大文字と小文字は区別されません。拡張子として、.wmf、.sat、.eps、.dxf、.bmp のいずれかを使用します。

SelectionSet

アクセス: 入力のみ

タイプ: SelectionSet

形式で、選択セットは書き出すオブジェクトを指定します。<I>EPS</I>、<I>DXF</I> 形式では、選択セットは無視され、図面全体が書き出されます。

構文と要素 - LayerStateManager

VBA:

object.Export Name, FileName

object

タイプ: LayerStateManager

このメソッドが適用されるオブジェクト。

Name

アクセス: 入力のみ

タイプ: 文字列

書き出す保存された画層設定の名前。

FileName

アクセス: 入力のみ

タイプ: 文字列

画層設定の書き出し先ファイルの名前。

戻り値(RetVal)

戻り値はありません。

注意

WMF または BMP 形式で書き出す場合、この選択セットによって、図面から書き出すオブジェクトが指定されます。空の選択セットを指定すると、ユーザにオブジェクトを選択するように求めるプロンプトが表示されます。空の選択セットではなく、Nothing を指定すると、図面全体が書き出されます。

SAT 形式に書き出す場合は、1 つまたは複数のオブジェクトを含む選択セットを指定する必要があります。この選択セットによって、図面から書き出すオブジェクトが指定されます。Region オブジェクト、3DSolid オブジェクト、非マニホールドソリッド、3DSolid や Region オブジェクトに当てはまらないその他の ShapeManager 図形だけを書き出します。選択セットの他のオブジェクトはすべて無視されます。空の選択セットを指定すると、このメソッドはエラーなしで実行され、どのオブジェクトも書き出されません。

EPS または DXF 形式では、選択セットは無視され、図面全体が書き出されます。

画層の設定を書き出すときは、AutoCAD に画層設定書き出しファイルであることを自動的に識別させるために、.las という拡張子を出力ファイル名に必ず付けてください。

例

VBA:

Sub Example_Export()
    ' This example exports the current drawing to DXF format.
    ' Note that a valid selection set must be provided, even
    ' though the contents of the selection set are ignored.
    
    ' Define the name for the exported file
    Dim exportFile As String
    exportFile = "C:\AutoCAD\DXFExport"     ' Adjust path to match your system
    
    ' Create an empty selection set
    Dim sset As AcadSelectionSet
    Set sset = ThisDrawing.SelectionSets.Add("TEST")
    
    ' Export the current drawing to the file specified above.
    ThisDrawing.Export exportFile, "DXF", sset
    
End Sub

Visual LISP:

(vl-load-com)
(defun c:Example_Export()
    ;; This example exports the current drawing to DXF format.
    ;; Note that a valid selection set must be provided, even
    ;; though the contents of the selection set are ignored.
    (setq acadObj (vlax-get-acad-object))
    (setq doc (vla-get-ActiveDocument acadObj))     
    
    ;; Define the name for the exported file
    (setq exportFile "C:\\AutoCAD\\DXFExport")     ;; Adjust path to match your system
    
    ;; Create an empty selection set
    (setq sset (vla-Add (vla-get-SelectionSets doc) "TEST"))
    (vla-Select sset acSelectionSetAll)
    
    ;; Export the current drawing to the file specified above.
    (vla-Export doc exportFile "DXF" sset)

    (vla-Delete sset)
)