Chuyển đến nội dung
Diễn đàn CADViet
  • Thông báo

    • Nguyen Hoanh

      CADViet đã hoàn tất nâng cấp   14/09/2017

      Chào các bạn, CADViet đã hoàn tất việc nâng cấp lên phiên bản mới. Tất cả các chức năng đã hoạt động theo kỳ vọng của ban quản trị. Nếu có vấn đề gì cần phản hồi, các bản post ở đây nhé: Trân trọng, Nguyễn Hoành.
Đăng nhập để thực hiện theo  
bkhn_2011

Lisp thêm tiền tố vào tên của hàng loạt layer

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

bkhn_2011    1

Để thuận tiện cho việc quản lý các layer em cần một lisp như sau mong các anh trên diễn đàn có thể viết và chỉ giáo dùm. 

Lisp này dùng để thay đổi tên của hàng loạt các layer có trong bản vẽ. 

Ví dụ: Trong một bản vẽ em có 20 layer khác nhau với tên là : a,b,c,d,e ................... giở em muốn đổi tên hàng loạt thành. *a, *b, *c, *d........

- Bước một: Nhập lệnh => hỏi  cần thêm chữ gì vào các layer 

- Bước hai: quét các layer muốn thay đổi tên. Và kết thúc lệnh. 

 

Mong các anh nghiên cứu giúp, em rất cảm ơn.

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
phamthanhbinh    3.123

Để thuận tiện cho việc quản lý các layer em cần một lisp như sau mong các anh trên diễn đàn có thể viết và chỉ giáo dùm. 

Lisp này dùng để thay đổi tên của hàng loạt các layer có trong bản vẽ. 

Ví dụ: Trong một bản vẽ em có 20 layer khác nhau với tên là : a,b,c,d,e ................... giở em muốn đổi tên hàng loạt thành. *a, *b, *c, *d........

- Bước một: Nhập lệnh => hỏi  cần thêm chữ gì vào các layer 

- Bước hai: quét các layer muốn thay đổi tên. Và kết thúc lệnh. 

 

Mong các anh nghiên cứu giúp, em rất cảm ơn.

 

Hề hề hề,

Dùng thử cái Annammitlisp này coi sao nhé. Tuy không hiện đại như các lisp của bác conghoa song có nhẽ cũng xài vô tư. Chú ý đừng chọn các layer không thể đổi tên khi lisp hỏi kẻo nó cãi chày cãi cối thì hơi mệt.....

Lisp này cho phép bạn lựa chọn layer cần rename chứ không chơi mội lèo như của bác conghoa

http://www.cadviet.com/upfiles/3/5194_laplayerlistselection.lsp

  • Vote tăng 2

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
sumi    55

Cả 3 lisp ở trên đều thêm vào sau tên layer, ko thêm vào trước tên layer được. Mình dùng lệnh Rename nhu Ketxu nói thì đổi tên hàng loạt được nhưng lại chỉ thêm vào trước tên layer thôi chứ ko thêm vào phía sau hàng loạt được.

Cũng ko biết lệnh WildcardKetxu nói là gì?

Thanks!

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
phamthanhbinh    3.123

Cả 3 lisp ở trên đều thêm vào sau tên layer, ko thêm vào trước tên layer được. Mình dùng lệnh Rename nhu Ketxu nói thì đổi tên hàng loạt được nhưng lại chỉ thêm vào trước tên layer thôi chứ ko thêm vào phía sau hàng loạt được.

Cũng ko biết lệnh WildcardKetxu nói là gì?

Thanks!

Hề hề hề,

Bạn đã xài thử các lisp này chưa mà phán như đúng rồi vậy???

  • Vote tăng 2

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
conghoa    93

@phamthanhbinh bác có thể chỉnh cái lisp của bác để cho người dùng có thể chọn layer bằng cách chọn 1 vùng đối tượng trong bản vẽ, các layer nào trong vùng chọn sẽ được chỉnh tên được không :D

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
Polyline    18

Layer là công cụ quản lý rất tốt của AutoCAD, hình như nó không giới hạn số lượng layer trong bản vẽ.

Lisp của bác phamthanhbinh thì tốt, tuy nhiên, khi bản vẽ có khoảng 100 Layer thì công việc trở nên rắc rối. Đó là chưa kể thực hiện lần 1, nếu có nhầm lẫn gì thì còn thực hiện lần 2, lần 3 nữa.

Do đó, mong bác nào có lòng hảo tâm bỏ chút thời gian ra viết cái hộp thoại liệt kê các layer ở bên trái, cái nào muốn đổi tên thì đưa nó qua bên phải và hiện tên mới cho nó luôn. Nên bỏ qua các layer mặc định của AutoCAD (là 0 và Defpoints) và các Xref.

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
bkhn_2011    1

Tặng bạn 2 Lisp để chỉnh sửa tên Layer (cái này mình sưu tầm được)

 

1969_rl2.jpg

http://www.cadviet.com/upfiles/3/1969_rl_edit_ten_layer_nhanh.lsp

 

1969_rl2_edit_ten_layer_nhanh.jpg

http://www.cadviet.com/upfiles/3/1969_rl2_edit_ten_layer_nhanh.lsp

Mình đã down về mà không sử dụng được. Bạn hướng dẫn cụ thể giúp mình với nhé. 

Sau khi gõ lệnh RL: lệnh yêu cầu thêm tiền tố. Mình thêm rồi sau đó enter thì nó chỉ báo ; "error: Automation Error. Invalid input" 

Của bạn thì bạn thao tác thế nào. Cảm ơn

  • Vote giảm 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
bkhn_2011    1

Vì sao không xem xét ý kiến của Ketxu nhỉ? Đơn giản, tường minh, nhanh gọn lẹ thế thì còn cần lisp làm gì?

 

Cũng đồng ý với bạn là đơn giản tường minh thì không cần lisp nữa. Nhưng mình rename xong chỉ đổi tên từng layer một. 

Và mình không hiểu cái wild card là gì nữa mong các bạn am hiểu giải thích rõ giúp với. 

 

Vấn đề là mình chỉ cần thêm tiền tố hoặc hậu tố vào tên layer thôi nhé. Không cần phải thay đổi cả tên layer đâ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
bkhn_2011    1

Sử dụng lệnh Rename kết hợp với wildcard bạn nhé :)

 ANh giải thích rõ hơn giúp em thêm một chút nhé. Cái wildcard em vẫn không biết nó là gì. Anh hướng dẫn giúp xem cụ thể thao tác thế nào. 

Rename xong tiếp theo là làm thế nào ạ.

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
bkhn_2011    1

Mình làm bình thường, không biết có phải do file của bạn ko, nếu được thì up file lên mình thử trực tiếp!

Đây file cad của mình đây à

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
bkhn_2011    1

ko thấy file của bạn đâu

Cám ơn mình dùng được rồi. Lệnh này không dùng được với font Vn thì phải mình đặt tên đường là "đường tim" thi không đổi được nhưng khi đặt là "duong tim" thì lại được. 

p/s: Nhưng đổi tên nó cứ thêm vào nên hơi bất tiện.

Ví dụ: 

Mình có layer là "wall" sau đó thay đổi thành "A-wall" giờ muốn thay đổi lại như ban đầu thì lại không được(Vì nó cứ thêm mãi vào đầu thôi). Đấy là giả sử mình có một layer còn nếu nhiều thì không kiểm xoát được. Có cách nào không hả bạn

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
ketxu    2.653

về wildcard thì không biết có phải cái này không ketxu nhỉ :)

http://www.ccadinc.com/autocad-tutorials-wildcard.html

 

Đúng rồi :)

 

 ANh giải thích rõ hơn giúp em thêm một chút nhé. Cái wildcard em vẫn không biết nó là gì. Anh hướng dẫn giúp xem cụ thể thao tác thế nào. 

Rename xong tiếp theo là làm thế nào ạ.

 

Bạn tham khảo link conghoa gửi kìa, nó là các ký tự đại diện. Đây cũng là lý do đặt tên trong CAD thường kèm theo tiền tố/hậu tố để xử lý hàng loạt đơn giản hơn

 

Ví dụ của bạn, cần thêm tiền tố ABC vào tất cả tên layer :

Old name : *

New name :ABC *

 

Hay cần thêm Chữ A vào tất cả layer bắt đầu bằng KT thì :

Old name :KT*

New name :A KT*

 

Hay cần xóa tiền tố A- như bạn hỏi bên trên :

Old : A-*

New : *

 

Ngoài ra còn nhiều áp dụng khác nếu bạn đọc kỹ ^^

 

Và nếu  cần viết lisp thì dùng ngay lệnh -Rename sẽ đơn giản rất 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
ketxu    2.653

Cả 3 lisp ở trên đều thêm vào sau tên layer, ko thêm vào trước tên layer được. Mình dùng lệnh Rename nhu Ketxu nói thì đổi tên hàng loạt được nhưng lại chỉ thêm vào trước tên layer thôi chứ ko thêm vào phía sau hàng loạt được.

Cũng ko biết lệnh WildcardKetxu nói là gì?

Thanks!

Old : *

New : *-Trước_sau_như_nhau

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
bkhn_2011    1

Đúng rồi :)

 

 

Bạn tham khảo link conghoa gửi kìa, nó là các ký tự đại diện. Đây cũng là lý do đặt tên trong CAD thường kèm theo tiền tố/hậu tố để xử lý hàng loạt đơn giản hơn

 

Ví dụ của bạn, cần thêm tiền tố ABC vào tất cả tên layer :

Old name : *

New name :ABC *

 

Hay cần thêm Chữ A vào tất cả layer bắt đầu bằng KT thì :

Old name :KT*

New name :A KT*

 

Hay cần xóa tiền tố A- như bạn hỏi bên trên :

Old : A-*

New : *

 

Ngoài ra còn nhiều áp dụng khác nếu bạn đọc kỹ ^^

 

Và nếu  cần viết lisp thì dùng ngay lệnh -Rename sẽ đơn giản rất nhiều

 

Tuyệt vời. Mẹo nhỏ mà công dụng thì ảo diệu thật. Cảm ơn các anh. 

Tuy nhiên cái lệnh bỏ ký tự đi em vẫn chưa thực hiện được. 

Ví dụ: Em có tên layer là "A-Wall" mà muốn bỏ chữ "A-" đi 

Khi đánh : * cơ mà nó không mất đi. 

 

Old: A-wall 

=> rename * ok. Nhưng không được. Anh hướng dẫn lại giùm em với aj

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
bkhn_2011    1

Mình làm bình thường, không biết có phải do file của bạn ko, nếu được thì up file lên mình thử trực tiếp!

 

Bạn chỉ cho mình cách để sau khi thêm tiền tố vào tất cả mà muốn lại bỏ tiền tố đó thì làm thế nào với ạ. 

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
ketxu    2.653

Mình nói rồi mà ?

Old : A-*

New : *

 

Không nói là Old : A-Wall >"<

 

Ký tự * trong cả Old và New có nghĩa là ở đấy là thằng gì cũng được

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
bkhn_2011    1

Mình nói rồi mà ?

Old : A-*

New : *

 

Không nói là Old : A-Wall >"<

 

Ký tự * trong cả Old và New có nghĩa là ở đấy là thằng gì cũng được

Em đã làm được rồi cảm ơn anh. Tuy nhiên cái cách rename chỉ đổi tên được những layer có thể sử dụng. Còn các layer không thể dùng (cái layer mà nó bị mờ mờ của xref thì không thể đổi tên được). 

Cái lisp của bạn Conghoa trên thì đổi tên được cả những layer mờ mờ đó. Bạn conghoa cho mình cách để xóa bớt những kí tự sau khi ta đã thêm vào tên của Layer nhé. 

Cảm ơn tất cả các anh và các bạn đã giải đáp thắc mắc của mình. 

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
bkhn_2011    1

Mình chỉ sưu tầm được thôi chứ không biết viết lisp :)

Hì hì. Thế bạn có hay dùng lisp này không? mà không thấy thắc mắc về nó à. 

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

Đăng nhập để thực hiện theo  

×