insertionPoint = Thisdrawing.Utility.GetPoint(, "Lua chon vi tri de mat cat:")
Edit có nghĩa là sửa chữa.Nếu co bị trục trặc gì nói mình edit cho nhé các bạn
Gởi các bạn file Vẽ mặt cắt dầm từ excel, cho bạn nào cần
Các bạn copy file có tên "cadClick" bỏ vào ổ C
Rồi mở file excel, enable macro là sử dụng.
Nếu co bị trục trặc gì nói mình edit cho nhé các bạn
View attachment 301765
Cảm ơn bạn để mình thêm mấy các thông số kia.Cảm ơn chia sẻ của bạn.
Bạn xem bổ sung thêm:
Cho phép người dùng nhập vị trí mặt cắt.
Bổ sung tên của dầm, chiều dài dầm, vẽ lúc nào cũng phải đi kèm tiêu đề;Mã:insertionPoint = Thisdrawing.Utility.GetPoint(, "Lua chon vi tri de mat cat:")
Mình thử sửa số lượng thép thì code vẽ chưa chính xác ?
*** Nên vẽ một lúc cả mặt cắt gối, nhịp. Thống kê lượng cốt thép, bê tông, ván khuôn ...
Em mở file excel xong bấm ALT F11, rồi làm như 2 hình sau xem sao. Ví dụ em xài Cad 2018 đến 2022 thì tick vào .......2021....em nhéSao em chạy file thì báo lỗi như nà nhỉ?
View attachment 301769
Nếu edit code trong khả năng mình thì mình edit, còn ko có các bạn trên diễn đàn nữa mà^^Edit có nghĩa là sửa chữa.
Bạn hứa sửa chữa bài của người ta hay sửa chữa code?
...
Nếu edit code trong khả năng mình thì mình edit, còn ko có các bạn trên diễn đàn nữa mà^^
Vậy bạn cần edit trên code hay trên file?Vẫn không giải thích: ê đít trên code hay trên file?
1. Code sai mà chỉnh sửa thì là "correct"
2. Code chưa đúng chỗ thì là "readjust the interface"
3. Code không cần "correct", hay "readjust" mà chỉ cần sửa cho người nào đó chạy đúng trường hợp đặc thù của họ thì là "customize"
Tức là bạn hứa làm cả hai?Vậy bạn cần edit trên code hay trên file?
Cái này mà nét thép dày = phi luôn thì đẹp hơn, và ký hiệu thanh là block xếp thẳng hàng thì đẹp, và thép màu layer riêng, ký hiệu layer riêng. Và sẽ còn rất nhiều thứ...Gởi các bạn file Vẽ mặt cắt dầm từ excel, cho bạn nào cần
Các bạn copy file có tên "cadClick" bỏ vào ổ C
Rồi mở file excel, enable macro là sử dụng.
Nếu co bị trục trặc gì nói mình edit cho nhé các bạn
View attachment 301765
Tò mò Tôi thử có lẻ thiếu thư viện CreateObject("AutoCAD.Application")Sao em chạy file thì báo lỗi như nà nhỉ?
View attachment 301769
DIỄN ĐÀN GIẢI PHÁP EXCEL Group 1
DIỄN ĐÀN GIẢI PHÁP EXCEL Group 2