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.
nghiautc

Load Linetype bằng VBA

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

nghiautc    18

Mình đang làm đoạn VBA cho line type nhưng đang mắc.Cần hỗ trợ của mọi người đây

1.

Ví dụ trong bản vẽ của mình có 1 Linetype "DASHDOT" nhưng mình không biết nó thuộc "acad.lin" hay "acaiso.lin"

giờ làm sao để biết nó thuộc file "acad.lin" hay "acadiso.lin"

Nếu không biết được nó thuộc file nào thì có thể load lại cho nó thuộc 1 trong 2 file trên được không?

Đây là dòng lệnh mình load khi bản vẽ chưa có "DASHDOT"

on error resume next

ThisDrawing.Linetypes.Load "DASHDOT", "acad.lin"

Giờ muốn load lại vào "acadiso.lin" mình thử dòng lệnh sau nhưng ko đc

ThisDrawing.Linetypes.Load "DASHDOT", "acadiso.lin"

2.

ThisDrawing.SendCommand "-linetype Load center2" & Chr(10)

Cách này mình dùng phương thức sendcommand để gửi tới dòng lệnh nhưng sau dòng chr(10) không biết làm tiếp như

thể nào bởi cad xuất hiện 1 hộp thoại

1.jpg

không biết làm sao để clịck vào open đượ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
ketxu    2.649

Hình như k thể load 1 Linetype nếu nó trùng tên với Liinetypes đã có sẵn bạn à.Nếu bạn để ý ví dụ của CAD sẽ còn có đoạn :

If Err.Description = "Duplicate record name" Then

MsgBox "A line type named '" & linetypeName & "' already exists.", , "Load Example"

End If

Để chắc chắn có thể add linetypes từ file bạn muốn, hãy thử dùng method Delete để xoá Linetype đó trước khi load lại ^^

  • 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
nghiautc    18

Nếu bản vẽ chưa có đối tượng hay layer dùng hidden thì mình nghĩ dùng Pu là ok. Nhưng nếu đã có layer hay đối tượng mình không biết dùng

phương thức delete như thế nào bận có thể cho code phương thức delete ko.Mình 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

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


×