Làm cách nào để đánh danh sách tên chủ đầu tư và địa chỉ vào khung bản vẽ nhanh nhất

[nancy9x 4]

30 phút trước, cuongtk2 đã nói:

Lisp đó không thể đáp ứng được yêu cầu của em, vì mục tiêu khác nhau.

 Của em là xuất att ra excel, dán tên khách hàng và địa chỉ vào 2 cột rồi nhập file đó vào cad là nó sẽ update lại block khung tên theo nội dung của file xls đó

  

em chỉ cần lisp như 2 yêu cầu trên thôi anh còn vấn đề xuất ra excel em ko cần nữa anh ạ

[cuongtk2 475]

Nếu dùng TCVN3 cho txt và cad thì việc xuất nhập sẽ không gây lỗi nhé. Vì vậy hãy mở file txt  bằng excel, đặt font .VnArial cho excel rồi dán các cột vào là được. Có thể em phải chuyển từ Unicode sang TCVN3 cho các cột cần thiết. Ctrl+Shift+F9 mã

[cuongtk2 475]

File mẫu đây

Drawing1.txt

Drawing1.dwg

[cuongtk2 475]

Còn một phương án nữa là viết 1 lệnh để paste clipboard vào 1  text,att. Tuy nhiên không cách nào làm hàng loạt. Nó còn tệ hơn chèn excel vào cad thành table rồi explode. Dùng lisp của Duy để trans nội dung từng att

[tannguyen291 174]

Cách viết bằng .net hoặc vba như bác @cuongtk2 là hợp lý nhất. Tool 1:  mỗi khách hàng tạo  1 file tương ứng. Tool 2: autoload mở file -> so sánh tên file -> nhập địa chỉ -> save, close tự động. Làm xong xoá tool 2.

Tuy nhiên với lisp vẫn có cách. Cài visual studio code và extension autolisp rồi chuyển lispsys qua 1. autocad sẽ được hỗ trợ các ký tự unicode dùng thoải mái luôn.

Hoặc dùng 1 hàm vba đơn giản bên excel có tác dụng đổi ký tự về dạng u+hex là được :))

 

[nancy9x 4]

15 phút trước, cuongtk2 đã nói:

Còn một phương án nữa là viết 1 lệnh để paste clipboard vào 1  text,att. Tuy nhiên không cách nào làm hàng loạt. Nó còn tệ hơn chèn excel vào cad thành table rồi explode. Dùng lisp của Duy để trans nội dung từng att

vâng lisp anh Duy chỉ pick được từng att  thôi chứ ko quét được toàn bộ anh ạ

[CadExTools 111]

Thí chủ tham khảo nhé. Hàng có sẵn. Kiếm ly cafe ak

https://www.youtube.com/watch?v=9Bn3o1ciIyM

 

[cuongtk2 475]

45 phút trước, tannguyen291 đã nói:

Cách viết bằng .net hoặc vba như bác @cuongtk2 là hợp lý nhất. Tool 1:  mỗi khách hàng tạo  1 file tương ứng. Tool 2: autoload mở file -> so sánh tên file -> nhập địa chỉ -> save, close tự động. Làm xong xoá tool 2.

Tuy nhiên với lisp vẫn có cách. Cài visual studio code và extension autolisp rồi chuyển lispsys qua 1. autocad sẽ được hỗ trợ các ký tự unicode dùng thoải mái luôn.

Hoặc dùng 1 hàm vba đơn giản bên excel có tác dụng đổi ký tự về dạng u+hex là được :))

 

Mình không nghĩ mỗi hạng mục công trình chỉ có 1 bản vẽ :)). Do đó việc update tên hạng mục cho 1file bản vẽ duy nhất là  không khả thi.

[abiabu9x 1]

Vào lúc 5/11/2023 tại 20:53, cuongtk2 đã nói:

Nếu dùng TCVN3 cho txt và cad thì việc xuất nhập sẽ không gây lỗi nhé. Vì vậy hãy mở file txt  bằng excel, đặt font .VnArial cho excel rồi dán các cột vào là được. Có thể em phải chuyển từ Unicode sang TCVN3 cho các cột cần thiết. Ctrl+Shift+F9 mã

Anh ơi khi em attin vào thì sao thứ tự danh sách nó cứ từ dưới lên chứ ko từ trên xuống anh nhỉ , mà địa chỉ dài quá nó chỉ trong 1 dòng tràn ra cả ngoài khung, em chưa biết xử lý sao giờ ạ

[cuongtk2 475]

1. Thứ tự att do cách tạo block, nên lựa chọn lần lượt att theo ý định.

2. Nếu attribute bị tràn ra ngoài khung thì dùng att multilines dạng mtext.

[abiabu9x 1]

8 phút trước, cuongtk2 đã nói:

1. Thứ tự att do cách tạo block, nên lựa chọn lần lượt att theo ý định.

2. Nếu attribute bị tràn ra ngoài khung thì dùng att multilines dạng mtext.

Khổ cái là em dùng cad 2007 nên không có multilines, thứ tự ở đây là có 5 khung tương ứng với địa chỉ 5 cái ví dụ: địa chỉ 1,2,3,4,5 em xuất ra attout thì trong files nó lại sắp xếp theo 5,4,3,2,1.Em chuyển ra excel và copy files địa chỉ vào thì nó bị ngược thứ tự sắp xếp, nên giải quyết thế nào anh? 

 

[cuongtk2 475]

Tạo lại block mới thôi, 

[ZIS3 13]

Vào lúc 5/11/2023 tại 21:48, CadExTools đã nói:

Thí chủ tham khảo nhé. Hàng có sẵn. Kiếm ly cafe ak

https://www.youtube.com/watch?v=9Bn3o1ciIyM

 

Bạn này chắc cao thủ Excel, lần đầu tiên tôi thấy Tool CAD mà lại lấy Excel làm chủ.

*

Chỗ này tôi bàn thêm, bạn thấy không đúng thì bỏ qua:

Tôi cho rằng cách làm này có vấn đề rất lớn về hiệu suất, nói nôm na là chậm.

Cách làm của bạn có vẻ là:   Từ Excel VBA, tham chiếu các thư viện của CAD & phải chỉ đích danh 1 phiên bản CAD cụ thể (?).  Thao tác chủ yếu trên CAD, nhưng lại do Excel truyền lệnh. 

Đây là kiểu Out-of-process, năng suất rất thấp, vì tương tác giữa 2 process Excel.exe và AutoCAD.exe quá nhiều.

Làm vài chục cái khung tên thì được, cỡ trăm khung là bắt đầu thấy lâu, vài ngàn khung thì hết ngày.

https://through-the-interface.typepad.com/through_the_interface/2007/12/launching-autoc.html

Thay vào đó bạn nên lấy AutoCAD làm chủ, thao tác trên AutoCAD xong rồi ôm 1 cục kết quả sang Excel.

 

 

 

 

[abiabu9x 1]

27 phút trước, cuongtk2 đã nói:

Tạo lại block mới thôi, 

Cái phần text tràn khung có xử lý đc không anh nhỉ? 

[abiabu9x 1]

23 phút trước, ZIS3 đã nói:

Bạn này chắc cao thủ Excel, lần đầu tiên tôi thấy Tool CAD mà lại lấy Excel làm chủ.

*

Chỗ này tôi bàn thêm, bạn thấy không đúng thì bỏ qua:

Tôi cho rằng cách làm này có vấn đề rất lớn về hiệu suất, nói nôm na là chậm.

Cách làm của bạn có vẻ là:   Từ Excel VBA, tham chiếu các thư viện của CAD & phải chỉ đích danh 1 phiên bản CAD cụ thể (?).  Thao tác chủ yếu trên CAD, nhưng lại do Excel truyền lệnh. 

Đây là kiểu Out-of-process, năng suất rất thấp, vì tương tác giữa 2 process Excel.exe và AutoCAD.exe quá nhiều.

Làm vài chục cái khung tên thì được, cỡ trăm khung là bắt đầu thấy lâu, vài ngàn khung thì hết ngày.

https://through-the-interface.typepad.com/through_the_interface/2007/12/launching-autoc.html

Thay vào đó bạn nên lấy AutoCAD làm chủ, thao tác trên AutoCAD xong rồi ôm 1 cục kết quả sang Excel.

 

Em mua lisp của bác ấy về dùng nhưng đang bó tay cho cad đời 07 và 10, gần đây em bận chưa nhờ bác ấy chỉnh sửa lại cho dùng trên cad đời thấp được