[討論]請教Excel建立資料,AutoCAD執行繪製?

資料作業模式Excel

以下為Excel儲存格建立聚合線批次資料,於AutoCAD指令欄貼上可直接繪製完成


以下為Excel儲存格建立單行文字批次資料,於AutoCAD指令欄貼上可直接繪製完成


請大大幫忙,我的問題是插入圖塊發生問題
指令:insert(出現對話框)
選擇圖塊名稱:point(選擇完成之後需要"確定") 如何在Excel編寫資料,讓AutoCAD對話框裡面的"確定"鍵,可以自己執行

成功執行例子:
執行單行文字如下編輯: 執行1行多一個儲存格 可以結束輸入 也可以當成重複指令 空格也可以當成執行
串連說明 ：DTEXT△-8.682,12.87△3△0△1
DTEXT ：單行文字
△ ：空格(在AutoCAD指令欄當Enter)
-8.682,12.87 ：E坐標 , N坐標
3 ：文字高度
0 ：文字旋轉角
1 ：顯示文字

可以將Excel的資料儲存成scr檔！
然後使用巨集語法加入-insert等方式插入圖塊！

Tiger&蘋果爸 寫到:可以將Excel的資料儲存成scr檔！
然後使用巨集語法加入-insert等方式插入圖塊！

小弟對這個也很感性興, 能弄個小例子嗎? 還是那邊有資料可以參考? 感謝~

Excel貼過去是可以使用的，只要要自己按住"Enter"鍵，所有圖塊就可以順利插入指定的坐標位置上。
使用這種方法也是很無奈，因公司使用群只接受這樣。

開心的事情來ㄌ，公司電腦要升級了window 8 直接跳到autocad 2013
2002-2013直接跳11個版本
好開心(終於可以有機會接觸蘋果爸的使用範例了)
只是有可能是明年才會安裝

Jakie 寫到:Excel貼過去是可以使用的，只要要自己按住"Enter"鍵，所有圖塊就可以順利插入指定的坐標位置上。
使用這種方法也是很無奈，因公司使用群只接受這樣。

開心的事情來ㄌ，公司電腦要升級了window 8 直接跳到autocad 2013
2002-2013直接跳11個版本
好開心(終於可以有機會接觸蘋果爸的使用範例了)
只是有可能是明年才會安裝

是否可以提供局部的檔案來測試使用！
PS:恭喜你們公司使用新版本，這樣才有新優勢，不過window 8搭配autocad 2013不知道會不會有問題呢～

因為EXCEL無法在INSERT前面加上-
所以你必須在出現INSERT對話方塊後，使用者需自行再按下「Enter鍵」！

這裡建議改個作法，在EXCEL複製後，不要貼到AutoCAD，請先改貼到記事本，再將插入語法修改（如圖所示），最後儲存為SCR格式，然後在AutoCAD中使用SCRIPT指令載入，即可自動完成插入圖塊。註：請將▲改為空格。

看合不合用，新手駕駛 把原有的再編修一下
http://autocad.bestoforum.net/t12676-topic?highlight=%E5%B1%95%E9%BB%9E

再編修後..

代碼:


(defun c:3030()
(setvar "cmdecho" 0)
(SETVAR "PDMODE" 35)
(setq DD (GETSTRING "\n 輸入預插入展點附帶圖塊名稱："))
(setq dat_file (getfiled "展點測式" "C:\\Documents and Settings\\Administrator\\桌面\\TEST10" "dat" 2))  ;;此處C的資料夾要自訂
(SETQ SD 3 SD1 0) 
(setq ff (open dat_file "r") data (read-line ff))
(command "-insert" DD DATA 1 0 "" "POINT" DATA "TEXT" DATA SD SD1 "A1" "") 
(SETQ DATA1 DATA AAA 2)
(WHILE data
(setq data (read-line ff))
(command "-insert" DD DATA 1 0 "" "POINT" DATA "LINE" DATA DATA1 "")                         
(COMMAND "TEXT" DATA SD SD1 (STRCAT "A" (RTOS AAA 2)) "")
(SETQ DATA1 DATA) 
(SETQ AAA (+ AAA 1)))
(close ff)
(prin1))