Gửi đến các bạn 1 lisp chuyển đổi Text từ AutoCAD sang Excel. Vì không phải là 1 vấn đề gì đó quá mới mẻ nên mình sẽ viết với mục tiêu là dễ sử dụng và có tính thích nghi cao, ứng dụng cho nhiều yêu cầu đề bài phức tạp.
Công dụng
- Chuyển Text, Mtext từ AutoCAD sang Excel:
+ Dữ liệu đầu vào: Text và Mtext (lưu ý lisp sẽ căn cứ vị trí text theo Điểm Căn lề-Text Alignment)
+ Dữ liệu đầu ra: Nội dung của các text trên được paste sang Excel (file excel hiện hành hoặc tạo mới), dữ liệu được paste theo nhiều hàng cột, hoặc 1 hàng/cột theo tùy chọn của người dùng
- Chuyển Table từ AutoCAD sang Excel (không bị lỗi dấu tiếng Việt)
+ Dữ liệu đầu vào: 1 hoặc nhiều Table
+ Dữ liệu đầu ra: 1 hoặc nhiều Sheet trong 1 file Excel tạo mới
Tên lệnh:
TTE - Chuyển Text, Mtext từ AutoCAD sang Excel
TBE - Chuyển Table từ AutoCAD sang Excel
TTE - Chuyển Text, Mtext từ AutoCAD sang Excel
- Chuyển Text sang Excel theo hàng cột
- Trường hợp Text đầu vào không thẳng hàng tuyệt đối, hoặc bảng có những ô trống, lisp vẫn có thể hiểu được, khi đó cần nhập sai số khoảng cách hàng/cột. Lưu ý: nhập vừa đủ vì nếu nhập quá nhỏ thì các text hơi lệch nhau sẽ bị hiểu là nằm trên các hàng/cột khác nhau; nếu nhập quá lớn, lisp sẽ hiểu 2 hàng/cột sát nhau là 1.
- Chuyển Text sang Excel theo 1 hàng hoặc 1 cột, theo thứ tự người dùng tùy chọn, ví dụ: trên>dưới, trái>phải, theo chiều Pline, theo thứ tự pick chọn.
TBE - Chuyển Table từ AutoCAD sang Excel
- Dữ liệu đầu vào: 1 hoặc nhiều Table
- Dữ liệu đầu ra: 1 hoặc nhiều Sheet trong 1 file Excel tạo mới
- Lưu ý: trước khi dùng lệnh phải cài biến LISPSYS về 1
Link download
https://drive.google.com/drive/u/1/folders/1cgAEdSnXy4s48-0PP8XTTtDfWJNlanVR
Chúc các bạn thành công :)))