Chuyển đến nội dung
Diễn đàn CADViet
vminh_ct

hỏi về lệnh c2e trong lisp chuyển cad sang excel của bác Hoành

Các bài được khuyến nghị

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

cơ mà b có đang còn xài nó k? tôi chuyển từ xel sang cad nó bị lỗi hoài :(

Lỗi gì bạn ? Mình dùng vẫn OK mà !

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Hi anh Nguyen Hoanh,
Anh cho em hỏi về autolisp chuyển text từ Autocad sang Excel của anh một chút. Em đang cần chuyển text từ Autocad sang excel với một số lượng lớn nên cần tích hợp cái autolisp của anh vào file Excel VBA để chạy tự động, tuy nhiên khi em dùng sendcommand trong VBA thì gặp một vấn đề là autolisp hỏi đường dẫn để lưu file *.csv. Anh có thể giúp em chỉnh sửa autolisp của anh dể nó tự động lưu vào thư mục chứa file autocad đang mở và tên file trùng với tên file autocad đang mở được không?. File cad em cần chuyển ở link đưới, phần cần chuyển được highlight màu đỏ a.
<a href="http://www.4shared.com/photo/Gg_oc9Z4ce/40148-BPS-53-L-XN-30604_C1_MU1.html">http://www.4shared.com/photo/Gg_oc9Z4ce/40148-BPS-53-L-XN-30604_C1_MU1.html</a>

Cảm ơn anh nhiều!

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Hi anh Nguyen Hoanh,

Anh cho em hỏi về autolisp chuyển text từ Autocad sang Excel của anh một chút. Em đang cần chuyển text từ Autocad sang excel với một số lượng lớn nên cần tích hợp cái autolisp của anh vào file Excel VBA để chạy tự động, tuy nhiên khi em dùng sendcommand trong VBA thì gặp một vấn đề là autolisp hỏi đường dẫn để lưu file *.csv. Anh có thể giúp em chỉnh sửa autolisp của anh dể nó tự động lưu vào thư mục chứa file autocad đang mở và tên file trùng với tên file autocad đang mở được không?. File cad em cần chuyển ở link đưới, phần cần chuyển được highlight màu đỏ a.

<a href="http://www.4shared.com/photo/Gg_oc9Z4ce/40148-BPS-53-L-XN-30604_C1_MU1.html">http://www.4shared.com/photo/Gg_oc9Z4ce/40148-BPS-53-L-XN-30604_C1_MU1.html</a>

 

Cảm ơn anh nhiều!

Bạn sửa dòng lệnh

(getfiled "Chon file de save" "" "csv" 1)

Thành

(strcat (getvar "dwgprefix") (getvar "dwgname") ".csv")

  • Vote tăng 1

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Hi anh Nguyen Hoanh

Anh cho em hỏi về autolisp (c2e) chuyển text từ Autocad sang Excel của anh một chút, em thấy trong chương trình có biến là "e" nhưng em không thấy anh khai báo ở đâu hết, mong anh giải thích thêm cho em hiểu. Cảm ơn anh.

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Kính chào các bác,

Có cách giải quyết cho tình trạng này không ạ?
Khi dùng lisp chép và thay hàng loạt dữ liệu từ exel vào cad (một cell cho 1 text trong cad) thì các ký tự có dấu (nặng - ạ, ậ...) bị chuyển thành dấu hỏi.
Ví dụ như:

Đặng Trần Côn (bổ sung bể làm gốc) => Ð?ng Tr?n Côn (b? sung b? làm g?c)

Nguyễn Bá Lại nâng cos đường => Nguy?n Bá L?i nâng cos du?ng 

Mong các cao thủ giúp sức, cảm ơn nhiều ạ.

 

image.png

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác
4 giờ trước, ketxu đã nói:

Dùng visual lisp để đọc ký tự Unicode thì khó rồi ^

Ở cad đời cao nếu chuyển LISPSYS qua 1 và chỉ dùng Clipboard không thông qua file csv thì được ạ

giphy.gif

 

Chia sẻ bài đăng này


Liên kết tới bài đăng
Chia sẻ trên các trang web khác

Tạo một tài khoản hoặc đăng nhập để nhận xét

Bạn cần phải là một thành viên để lại một bình luận

Tạo tài khoản

Đăng ký một tài khoản mới trong cộng đồng của chúng tôi. Điều đó dễ mà.

Đăng ký tài khoản mới

Đăng nhập

Bạn có sẵn sàng để tạo một tài khoản ? Đăng nhập tại đây.

Đăng nhập ngay

×