AutoCAD顧問
還沒有註冊嗎...即日起免費註冊,所有最完整的AutoCAD討論、教學及資源都在論壇裡喔~

Join the forum, it's quick and easy

AutoCAD顧問
還沒有註冊嗎...即日起免費註冊,所有最完整的AutoCAD討論、教學及資源都在論壇裡喔~
AutoCAD顧問
Would you like to react to this message? Create an account in a few clicks or log in to continue.
[問題]標籤貼紙製作(已解答) Io15011 [問題]標籤貼紙製作(已解答) 2020-310 [問題]標籤貼紙製作(已解答) Oiu15010 [問題]標籤貼紙製作(已解答) 2020-211 [問題]標籤貼紙製作(已解答) Oo-2-110 [問題]標籤貼紙製作(已解答) BPl3tjj

[問題]標籤貼紙製作(已解答)

向下

[問題]標籤貼紙製作(已解答) Empty [問題]標籤貼紙製作(已解答)

發表 由 MOXCHO 2020-12-25, 17:18

各位大大 大家好:
小弟我有個問題
我們公司需要在產品上貼上標籤貼紙
因為產品是用於戶外。用的是抗UV防水的材質,所以沒法自己用打印機打印

貼紙的內容有品名、編號、用途
過去是先在EXCEL列出清單
然後在一個個複製貼上到CAD中
所以就變成一直重複下面的動作
點EXCEL>從EXCEL複製內容>點CAD的文字>貼上複製的內容>

目前能想到的辦法是做成屬性增強圖塊
這樣可以在屬性欄修改文字內容,會比雙擊文字快一點,但也僅僅是快一點點
不知道有沒有更好的方法
不然每次都是幾十張,每張3個內容就是重複上百次同樣的動作,浪費時間不說還好容易出錯


MOXCHO 在 2020-12-29, 18:34 作了第 1 次修改
MOXCHO
MOXCHO
一般會員
一般會員

文章總數 : 33
年齡 : 40
來自 : 台中
職業 : 工程師
愛好 : 程式語言、繪圖
個性 : 隨意
使用年資 : 斷斷續續地用了3~4年
使用版本 : 2007、2010(目前主要)
經驗值 : 2978
威望值 : 36
注冊日期 : 2013-09-27
男 金牛座 雞

回頂端 向下

[問題]標籤貼紙製作(已解答) Empty 回復: [問題]標籤貼紙製作(已解答)

發表 由 droaaa 2020-12-28, 09:31

可以試著把 EXCEL 資料直接匯入 CAD中使用
droaaa
droaaa
高級會員
高級會員

文章總數 : 494
年齡 : 38
來自 : 宜蘭
職業 : 畫畫圖
愛好 : 看動漫
個性 : 低調
使用年資 : 新手初學
使用版本 : 2008
積分 : 20
經驗值 : 8175
威望值 : 2157
注冊日期 : 2010-09-10
經典問與答讀者 藍鵲140號
2012聚會勳章 男 天蝎座 狗

Tiger&蘋果爸 likes this post

回頂端 向下

[問題]標籤貼紙製作(已解答) Empty 回復: [問題]標籤貼紙製作(已解答)

發表 由 Tiger&蘋果爸 2020-12-28, 09:47

droaaa方法很讚,通常EXCEL表我也會做連結
一般情況我還會直接從EXCEL複製,然後貼上成為AutoCAD圖元,就是轉成AutoCAD表格
竊喜

____________________________________________________________________________________
[問題]標籤貼紙製作(已解答) Oo-2-110 [問題]標籤貼紙製作(已解答) Ia15010 [問題]標籤貼紙製作(已解答) Ziao1510 [問題]標籤貼紙製作(已解答) BPl3tjj
Tiger&蘋果爸
Tiger&蘋果爸
系統管理員
系統管理員

文章總數 : 19657
年齡 : 45
來自 : 台北市文山區
職業 : AutoCAD顧問
愛好 : 蹓狗/戶外活動/拍照
個性 : 幽默/樂觀/善良
使用年資 : 20↑
使用版本 : AutoCAD 2021
經驗值 : 78598
威望值 : 15094
注冊日期 : 2008-04-23
2D基礎函授 2D進階函授 3D基礎函授 https://i.servimg.com/u/f11/19/71/67/71/2d3d10.png2D+3D線上 顧問外掛程式 經典問與答讀者 藍鵲1號
2009聚會勳章 2010聚會勳章 2011聚會勳章 2012聚會勳章 2013勳章-2D基礎 2014聚會勳章 2015聚會勳章 2016聚會勳章 串連貼紙成功 男 水瓶座 兔

http://mypaper.pchome.com.tw/kv1012tiger

回頂端 向下

[問題]標籤貼紙製作(已解答) Empty 回復: [問題]標籤貼紙製作(已解答)

發表 由 MOXCHO 2020-12-28, 11:56

droaaa 寫到:可以試著把 EXCEL 資料直接匯入 CAD中使用

感謝droaaa大大的回覆
這是個很好的方法,不過因為我的情況,做出來的貼紙有格式要求
3個項目不是水平排列,字體大小也會不同,且會有配合符號(例如LOGO)的需求
所以沒辦法以表格的型式製作

原諒我不會貼圖片 愛哭
MOXCHO
MOXCHO
一般會員
一般會員

文章總數 : 33
年齡 : 40
來自 : 台中
職業 : 工程師
愛好 : 程式語言、繪圖
個性 : 隨意
使用年資 : 斷斷續續地用了3~4年
使用版本 : 2007、2010(目前主要)
經驗值 : 2978
威望值 : 36
注冊日期 : 2013-09-27
男 金牛座 雞

回頂端 向下

[問題]標籤貼紙製作(已解答) Empty 回復: [問題]標籤貼紙製作(已解答)

發表 由 shackle_2005 2020-12-28, 12:19

歡迎上傳 sample, 來源及結果的檔案, 我幫你做個試用版小程式.


shackle_2005 在 2020-12-28, 14:37 作了第 1 次修改
shackle_2005
shackle_2005
初級會員
初級會員

文章總數 : 209
年齡 : 49
來自 : 台中
職業 : 程式設計
愛好 : 音樂
個性 : 隨和
使用年資 : 10 年
使用版本 : 2013
積分 : 3
經驗值 : 5318
威望值 : 316
注冊日期 : 2010-09-20
男 獅子座 豬

回頂端 向下

[問題]標籤貼紙製作(已解答) Empty 回復: [問題]標籤貼紙製作(已解答)

發表 由 Tiger&蘋果爸 2020-12-28, 13:00

shackle_2005 寫到:歡迎上傳 sample, 來源及結果的檔案, 我幫你做個試用版小程式. 如果需要客製化軟體, 找我就對了, 我的 LINE :
抱歉!!建議在這裡公開討論,不要私下用line服務

____________________________________________________________________________________
[問題]標籤貼紙製作(已解答) Oo-2-110 [問題]標籤貼紙製作(已解答) Ia15010 [問題]標籤貼紙製作(已解答) Ziao1510 [問題]標籤貼紙製作(已解答) BPl3tjj
Tiger&蘋果爸
Tiger&蘋果爸
系統管理員
系統管理員

文章總數 : 19657
年齡 : 45
來自 : 台北市文山區
職業 : AutoCAD顧問
愛好 : 蹓狗/戶外活動/拍照
個性 : 幽默/樂觀/善良
使用年資 : 20↑
使用版本 : AutoCAD 2021
經驗值 : 78598
威望值 : 15094
注冊日期 : 2008-04-23
2D基礎函授 2D進階函授 3D基礎函授 https://i.servimg.com/u/f11/19/71/67/71/2d3d10.png2D+3D線上 顧問外掛程式 經典問與答讀者 藍鵲1號
2009聚會勳章 2010聚會勳章 2011聚會勳章 2012聚會勳章 2013勳章-2D基礎 2014聚會勳章 2015聚會勳章 2016聚會勳章 串連貼紙成功 男 水瓶座 兔

http://mypaper.pchome.com.tw/kv1012tiger

回頂端 向下

[問題]標籤貼紙製作(已解答) Empty 回復: [問題]標籤貼紙製作(已解答)

發表 由 shackle_2005 2020-12-28, 14:36

不好意思, 我的意思是在這裏討論, 如果有需要進一步服務再找我啦, 拍謝喔, 謝謝 !!
shackle_2005
shackle_2005
初級會員
初級會員

文章總數 : 209
年齡 : 49
來自 : 台中
職業 : 程式設計
愛好 : 音樂
個性 : 隨和
使用年資 : 10 年
使用版本 : 2013
積分 : 3
經驗值 : 5318
威望值 : 316
注冊日期 : 2010-09-20
男 獅子座 豬

回頂端 向下

[問題]標籤貼紙製作(已解答) Empty 回復: [問題]標籤貼紙製作(已解答)

發表 由 droaaa 2020-12-28, 14:44

MOXCHO 寫到:
3個項目不是水平排列,字體大小也會不同,且會有配合符號(例如LOGO)的需求
表格要水平或垂直都可以自己選用
另外表格也可以設定每一格都是不同的字高或字型
更也可以插入 LOGO圖片(先製作成圖塊即可)
droaaa
droaaa
高級會員
高級會員

文章總數 : 494
年齡 : 38
來自 : 宜蘭
職業 : 畫畫圖
愛好 : 看動漫
個性 : 低調
使用年資 : 新手初學
使用版本 : 2008
積分 : 20
經驗值 : 8175
威望值 : 2157
注冊日期 : 2010-09-10
經典問與答讀者 藍鵲140號
2012聚會勳章 男 天蝎座 狗

Tiger&蘋果爸 likes this post

回頂端 向下

[問題]標籤貼紙製作(已解答) Empty 回復: [問題]標籤貼紙製作(已解答)

發表 由 Tiger&蘋果爸 2020-12-28, 14:58

MOXCHO 寫到:感謝droaaa大大的回覆
這是個很好的方法,不過因為我的情況,做出來的貼紙有格式要求
3個項目不是水平排列,字體大小也會不同,且會有配合符號(例如LOGO)的需求
所以沒辦法以表格的型式製作
原諒我不會貼圖片
貼圖片很簡單你可以參考論壇教學
「教學」論壇發表主題貼圖使用方法

貼圖後我們比較能了解你的需求~
竊喜

____________________________________________________________________________________
[問題]標籤貼紙製作(已解答) Oo-2-110 [問題]標籤貼紙製作(已解答) Ia15010 [問題]標籤貼紙製作(已解答) Ziao1510 [問題]標籤貼紙製作(已解答) BPl3tjj
Tiger&蘋果爸
Tiger&蘋果爸
系統管理員
系統管理員

文章總數 : 19657
年齡 : 45
來自 : 台北市文山區
職業 : AutoCAD顧問
愛好 : 蹓狗/戶外活動/拍照
個性 : 幽默/樂觀/善良
使用年資 : 20↑
使用版本 : AutoCAD 2021
經驗值 : 78598
威望值 : 15094
注冊日期 : 2008-04-23
2D基礎函授 2D進階函授 3D基礎函授 https://i.servimg.com/u/f11/19/71/67/71/2d3d10.png2D+3D線上 顧問外掛程式 經典問與答讀者 藍鵲1號
2009聚會勳章 2010聚會勳章 2011聚會勳章 2012聚會勳章 2013勳章-2D基礎 2014聚會勳章 2015聚會勳章 2016聚會勳章 串連貼紙成功 男 水瓶座 兔

http://mypaper.pchome.com.tw/kv1012tiger

回頂端 向下

[問題]標籤貼紙製作(已解答) Empty 回復: [問題]標籤貼紙製作(已解答)

發表 由 MOXCHO 2020-12-29, 09:39

感謝各位大大,我想我找到我希望的答案了
droaaa大大的影片雖然沒有直接給我答案,但給了我重要的啟發

我原本的方案是
將excel貼入CAD後,將文字改成我需要的格式,再將表格炸開,將文子移動到做好的標籤樣式中排列
這樣省下文字貼上複製的動作,但搬移也要花很多時間

受到droaaa大大的啟發是,影片中調整了表格尺寸<<這是我的盲區
所以動作變成我將做好的標籤樣式做陣列
把表格間距調整成跟我的標籤間距一樣,然後再炸開
這樣因為所有文字的間距與標籤的間距都是一樣的,所以可以一起搬移

如此一來,不管有多少張標籤要做,
僅需要
1.貼入Excel
2.調整文字樣式
3.調整表格尺寸後炸開
4.將3欄分別搬移到指定位置
就能完成了
將上百次重複動作節省成4個步驟,已是大幅提高效率
再次感謝各位提供的寶貴建議


MOXCHO
MOXCHO
一般會員
一般會員

文章總數 : 33
年齡 : 40
來自 : 台中
職業 : 工程師
愛好 : 程式語言、繪圖
個性 : 隨意
使用年資 : 斷斷續續地用了3~4年
使用版本 : 2007、2010(目前主要)
經驗值 : 2978
威望值 : 36
注冊日期 : 2013-09-27
男 金牛座 雞

回頂端 向下

[問題]標籤貼紙製作(已解答) Empty 回復: [問題]標籤貼紙製作(已解答)

發表 由 shackle_2005 2020-12-29, 11:17

https://www.autocad-tw.com/t19837-topic

從 Excel 轉進來資料, 再調整大小位置應該不會很困難才對, 參考一下.

'若excel未開,則開啟
Set objexcel = GetObject(, "Excel.Application")
If Err.Number > 0 Then
Set objexcel = CreateObject("Excel.Application")
Err.Clear
End If
Set wrkb = objexcel.ActiveWorkbook
Set wrks = objexcel.ActiveSheet
Set rng = objexcel.Selection

'插入表格圖塊
Set ssAll = ThisDrawing.SelectionSets.Add("xAllEntities")
If Err.Number <> 0 Then
Set ssAll = ThisDrawing.SelectionSets.item("xAllEntities")
ssAll.Clear
End If
shackle_2005
shackle_2005
初級會員
初級會員

文章總數 : 209
年齡 : 49
來自 : 台中
職業 : 程式設計
愛好 : 音樂
個性 : 隨和
使用年資 : 10 年
使用版本 : 2013
積分 : 3
經驗值 : 5318
威望值 : 316
注冊日期 : 2010-09-20
男 獅子座 豬

回頂端 向下

回頂端


 
這個論壇的權限:
無法 在這個版面回復文章
[問題]標籤貼紙製作(已解答) Uos15010 [問題]標籤貼紙製作(已解答) BPl3tjj [問題]標籤貼紙製作(已解答) Ziao1510 [問題]標籤貼紙製作(已解答) Oo-2-110 [問題]標籤貼紙製作(已解答) Oooo-110 [問題]標籤貼紙製作(已解答) 2020-211