AutoCAD 將配置複製到另一個檔案

     很多時候會需要製作多個設定相同配置的檔案，而減少重複製作時間，就是從別的檔案複製過來。



方法一：設計中心(指令ADCENTER)

此方法優點：可以一次複製多個配置到目前檔案
而缺點：必須打開要從位置來源的檔案

另外，此方法也可以適用複製圖層、文字型式、線型....等



方法二：配置的從樣板

1.指令：layout

輸入配置選項 [複製(C)/刪除(D)/新建(N)/樣板(T)......

選取[樣板(T)]

或是對配置按右鍵->從樣板

2.選取複製來源檔案

3.選取要複製的配置(可複選)


此方法優點：可以一次複製多個配置到目前檔案，並不用打開來源檔案
而缺點：


方法三：LISP

此方法優點：可以一次複製多個配置，並不用打開來源檔案
而缺點：不能打開來源檔案
此程式修改一小部分也可以變成將配置複製到其他檔案

(defun c:layouts (/ fname)
  (and (setq fname (getfiled "選取匯入配置來源的圖面" "" "dwg" 0))
       (imp_layouts fname)
       )
  (princ)
  )

(defun imp_layouts (source / *acad* doc l_import odbx Doctest
      path lays l_list)
  (vl-load-com)
  (setq *acad* (vlax-get-acad-object)
doc (vla-get-activedocument *acad*))
  ;;**** 檢查來源檔案是否開啟
  (vlax-for oDoc (vla-get-documents *acad*)
    (if (= (vla-get-fullname oDoc) source)
      (setq Doctest t)))
  (if (and (not Doctest) (findfile source))
      (progn ;_確保 ObjectDBX 可用
(if (> (setq versn (atoi (getvar "AcadVer"))) 15)
  (setq oDBX (vla-GetInterfaceObject
       *acad* (strcat "ObjectDBX.AxDbDocument." (itoa versn))))
  (progn
    (if (not (vl-registry-read
       "HKEY_CLASSES_ROOT\\ObjectDBX.AxDbDocument\\CLSID"))
      (startapp "regsvr32.exe"
(strcat "/s \"" (findfile "axdb15.dll") "\""))
      );_if
    (setq oDBX (vla-GetInterfaceObject
*acad* "ObjectDBX.AxDbDocument"))
    );_progn
  );_if
(vla-open oDBX source);_打開來源檔案
(setq lays (vla-get-layouts oDBX));_來源配置集合
(if (> (vla-get-count lays) 1);_確保有配置要匯入
  (progn
    (vlax-for x lays ;_循環配置集合並檢查名稱
;; 如此圖面中存在則省略
      (if (not (or (= "Model" (vla-get-name x))
   (member (vla-get-name x) (layoutlist))))
(setq l_list (append (list x) l_list )
      b_list (append (list (vla-get-block x)) b_list))
);if
      );for
    (setvar "ctab" "Model")
    (if l_list
      (progn
(setq l_import (vlax-safearray-fill
(vlax-make-safearray vlax-vbObject
  (cons 0 (- (length l_list) 1))
  ) l_list)
      b_import (vlax-safearray-fill
(vlax-make-safearray vlax-vbObject
  (cons 0 (- (length b_list) 1))
  ) b_list)
      );_建立用於 ActiveX 方法的 safearray
(vla-copyobjects oDBX l_import (vla-get-layouts doc))
(vla-copyobjects oDBX b_import (vla-get-blocks doc))
    (foreach x (layoutlist)
      (cond ((= x "Layout1")(vla-delete (vla-item (vla-get-layouts doc) x)))
    ((= x "Layout2")(vla-delete (vla-item (vla-get-layouts doc) x)))
    )
      )
(princ (strcat "\n配置導入成功: "
       (itoa (length l_list))))
;; 導入佈局
);_progn
      (princ "\n沒有要從來源圖面匯入的新版面配置...")
      );_if
    );_progn
  (princ "\n抱歉，在來源圖面中找不到配置，請重試。")
  );_if
(vlax-release-object oDBX);_釋放物件
);_progn
    (progn
      (if doctest
(princ "\n您嘗試使用 Autocad 正在使用的文件，請關閉它並重試...")
(princ "\n找不到原始文件，請重試......")
);_if
      );_progn
    );_if
  (princ);_悄悄退出
  );_defun


  

參考資料




留言

張貼留言

這個網誌中的熱門文章

AutoCAD 填充線(剖面線)樣式簡易製作產生器

圖片
＊填充線樣式製作使用說明： 1.每個樣式下載前，需將所需參數填入，除了樣式說明非必填，其餘必填。 2.在所需參數填入完成後，即可按下下載樣式按鈕，將會下載該填充線(Hatch)樣式的PAT檔。 3.檔案下載後，可將檔案放到CAD的支援檔搜尋路徑內即可在選取樣式區找到該樣式。 4.檔案/樣式名不能超過 31 個字元。 5.如有 錯誤 或 無法下載 ，請回復告知，感謝。(PS.請註明是哪個錯誤，如果可以請提供填入的數值測試) English Version 索引 1.瓷磚堆疊 2.瓷磚交錯 3.堆疊分割 4.堆疊錯位 5.水平縫 6.垂直縫 7.堆疊分割-雙高度 8.堆疊分割-雙寬度 9.六邊形-無縫 10.六邊形-有縫 11.四塊三角組方形 12.二塊三角組方形 14.人字拼-2-無縫 1.瓷磚堆疊 檔案/樣式名： 樣式說明： 瓷磚高度： 瓷磚寬度： 間隙寬度： 下載樣式 2.瓷磚交錯 檔案/樣式名： 樣式說明： 錯位偏移 % (0~100)： 瓷磚高度： 瓷磚寬度： 間隙寬度： 下載樣式 3.堆疊分割 檔案/樣式名： 樣式說明： 高度： 寬度： 下載樣式 4.堆疊錯位 檔案/樣式名： 樣式說明： 錯位偏移 % (0~100)： 瓷磚高度： 瓷磚寬度： 下載樣式 (2025/06/19已修正錯誤) 5.水平縫 檔案/樣式名： 樣式說明： 瓷磚高度： 瓷磚寬度： 間隙寬度： 下載樣式 6.垂直縫 檔案/樣式名： 樣式說明： 瓷磚高度： 瓷磚寬度： 間隙寬度： 下載樣式 7.堆疊分割-雙高度 檔案/樣式名： 樣式說明： 瓷磚高度1： 瓷磚高度2： 瓷磚寬度： 下載樣式 8.堆疊分割-雙寬度 檔案/樣式名： 樣式說明： 瓷磚高度： 瓷磚寬度1： 瓷磚寬度2： 下載樣式 9.六邊形-無縫 檔案/樣式名： 樣式說明： 邊長： 下載樣式 10.六邊形-有縫 檔案/樣式名： 樣式說明： 邊長： 間隙寬度： 下載樣式 11.四...
閱讀完整內容

AutoCAD 常用的圖塊統計方法

圖片
     在使用AutoCAD時，經常會使用許多圖塊，而如何統計圖塊數量，請參考下列方式： 1. 選取類似的(SelectSimilar) 1.1 可以使用右鍵 <選取類似的> 或是指令 <SelectSimilar> 1.2 可以在指令 <SelectSimilar> 中[設定(SE)]性質類似依據設定：顏色、圖層、線型、線型比例、線粗、出圖型式、物件型式、名稱。 缺點：不能只對局部圖面使用。 2. 快速選取(qselect) 2.1 使用指令 <qselect > 2.2 物件類型：圖塊參考，名稱：圖塊名 缺點：圖塊名不一定好記，圖塊太多會很難找到要找的圖塊名 3.篩選(Filter) 3.1 使用指令 <Filter > 3.2 點選<加入選取物件>產生選取物件性質，再刪除不要篩選的性質後，按下套用，選取物件 缺點：對動態圖塊使用，圖塊名稱為*U開頭，不同的狀態下*U後面的數字也不同，無法找到所有同個圖塊。 4. 資料萃取(Dataextraction) 缺點：不能只對局部圖面使用。 優點：設定過資料萃取樣板後，可快速下次使用。 5. COUNT 指令 - 計數（AutoCAD 2022 新功能） 官方在AutoCAD 2022 新增功能，可以計算圖塊數量，附帶偵測重疊圖塊顯示。 請參考 說明 。 備註：計數清單包括巢狀在其他圖塊中的圖塊。（巢狀是指圖塊中的圖塊） 可以對屬性圖塊、動態圖塊做分類統計數量。 可自訂區分類別：(可複選，名稱會以選擇項目中間用底線區隔) 一般圖塊：圖層、比例、鏡射狀態。 屬性圖塊：屬性定義名稱。 動態圖塊：動態圖塊的動態參數。 COUNTLIST - 開啟「計數」選項板，以檢視和管理計算的圖塊。 可顯示可能有該圖塊重疊、分解或更名的物件的組合。 6. BCOUNT (Express Tool) 於「選取物件」提示下，使用選取方式選取您要計算數量的圖塊，或直接按 Enter 以全選目前圖面中所有的圖塊。計算結果將顯示在指令行中。 範例輸出： Block.....Count --------------- CHAIR ....10 TABLE ....9 DESK .....4 備註：BCOUNT 不會選取或計算巢狀圖...
閱讀完整內容

AutoCAD 如何自訂線型教學

圖片
基本線型設定教學 每種線型，均在線型定義檔中，佔用兩行，來加以定義。 *線型名稱,線型描述 線型範例 A,線型樣式描述1,線型樣式描述2...... 第一行包含‥線型名稱，及可選擇是否設定的線型描述。 第二行，是定義實際線型樣式的字碼。 第二行必須以字母 A (對齊) 開始，後面接著定義提筆長度 (空格)、下筆長度 (虛線) ，和圓點的樣式描述子列示。 透過以分號 (;) 開始一行，您可以在 LIN 檔中，包含註解。 *線型名稱,線型描述 線型範例 A,線型樣式描述1,線型樣式描述2...... ＊線型名稱 ：以星號 ( * ) 開頭，並且應為線型唯一名稱。 ＊線型描述 ：線型描述會顯示在「線型管理員」，和「載入或重新載入線型」對話方塊中的描述欄位。該描述為可選擇是否設定，如果設定則需要與前面的線型名稱用逗號( , ) 分隔；反之，沒有設定該描述則請勿加入逗號( , ) 分隔。 ＊對齊點 (A) ：目前只有A類型對齊可以使用。用於指定個別線、圓、弧在端點處的樣式對齊動作，可以保證線與弧的起點與終點，均以虛線表示。 ＊樣式描述 ：每個樣式描述均會指定組成線型各區段的長度，以逗號分隔 (不允許有空格) 十進位正數，表示該長度的下筆 (虛線) 區段。 十進位負數，表示該長度的提筆 (空格) 區段。 虛線長度為 0 時，則繪製一個圓點。 A 類型對齊要求第一個虛線長度，大於或等於 0 (下筆區段)。第二個虛線長度，應小於 0 (提筆區段或空格)。必須至少有兩種虛線規格。 線型設定中加入文字(有文字的線型) 在線型描述中加入文字字元的格式如下： ["文字字串",文字型式名稱,比例,旋轉,X 偏移,Y 偏移] 調整比例、旋轉、X 偏移和 Y 偏移值必須以帶符號的十進位數值表示，例如 1、-17 和 0.01。 ＊文字字串 ：線型中要顯示的字元。 ＊文字型式名稱 ：要使用的文字型式名稱。如果未指定文字型式，則使用目前定義的型式。 註: 嵌入的文字字元與圖面中的文字型式相關聯。載入線型之前，與線型相關聯的文字型式必須存在。 ＊比例 ：用於文字型式之相對於線型比例的比例係數。所提供的比例係數字首必須為 S=，例如 S=.5 表示比例係數為 0.5。文字型式的高度會乘以比例係數。如果文字...
閱讀完整內容