Vẽ mặt cắt dầm từ excel (2 người xem)

[gpe.vn]

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

 

[huhumalu]

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.

insertionPoint = Thisdrawing.Utility.GetPoint(, "Lua chon vi tri de mat cat:")

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

 

[hongphuong1997]

Sao em chạy file thì báo lỗi như nà nhỉ?

 

[VetMini]

Nếu co bị trục trặc gì nói mình edit cho nhé các bạn

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?

 

[gpe.vn]

@CHAOQUAY....chào bạn hiề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 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.

insertionPoint = Thisdrawing.Utility.GetPoint(, "Lua chon vi tri de mat cat:")

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

Cảm ơn bạn để mình thêm mấy các thông số kia.
Còn bê tông với ván khuôn mình sẽ kèm trong phần vẽ shop dầm, khi đó đủ cả các vị trí gối nhịp và có bảng thống kê thép, BT, ván khuôn luôn bạn

 

[gpe.vn]

Sao em chạy file thì báo lỗi như nà nhỉ?
View attachment 301769

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é

Bài đã được tự động gộp: 17/6/24

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à^^

 

[VetMini]

...
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ẫ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"

 

[gpe.vn]

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"

Vậy bạn cần edit trên code hay trên file?

 

[VetMini]

Vậy bạn cần edit trên code hay trên file?

Tức là bạn hứa làm cả hai?

Chú thích: Trước khi tôi biết các thông số trong phần mềm của bạn có thuộc về bản quyền của ai thì tôi chả dám dùng đâu.

 

[cantl]

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á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ứ...

 

[Kiều Mạnh]

Sao em chạy file thì báo lỗi như nà nhỉ?
View attachment 301769

Tò mò Tôi thử có lẻ thiếu thư viện CreateObject("AutoCAD.Application")

 

[gpe.vn]

Mình update gồm:
-Bổ sung dim
-Gán các layer cho text, thép đai, thép chủ.....
-Các bạn cũng tải file về, chép đè file CadClick vào ổ C là ok nha các bạn
-Mình sẽ hoàn thiện 1 cái dầm đẩy đủ gồm cả thống kê cốt thép và chia sẻ cho các bạn nhé

 

[gpe.vn]

Tiếp tục tới đoạn này : Vẽ Autocad dầm bê tông cốt thép từ Excel, Các bạn tải lại file và làm theo thứ tự sau:
1) Chép file CadClick bỏ vào ổ C
2) Mở file autocad lên, nếu ko chương trình sẽ tự mở
3) Mở file excel lên, edit các thông số và nhấn nút 2CAD
4) Khi vẽ xong chương trình sẽ báo OK (thời gian là 2 phút tùy máy tính các bạn nha)

 

[huhumalu]

Tiếp tục tới đoạn này : Vẽ Autocad dầm bê tông cốt thép từ Excel, Các bạn tải lại file và làm theo thứ tự sau:
1) Chép file CadClick bỏ vào ổ C
2) Mở file autocad lên, nếu ko chương trình sẽ tự mở
3) Mở file excel lên, edit các thông số và nhấn nút 2CAD
4) Khi vẽ xong chương trình sẽ báo OK (thời gian là 2 phút tùy máy tính các bạn nha)

Bạn dùng ObjectDBX để có thể tác động vào file đang đóng >> Bạn có thể dồn toàn bộ block vào trong 1 bản vẽ, sau đó dùng ObjectDBX để có thể add một block bất kỳ trong bản vẽ đó, thay vì bạn đang để riêng lẻ từng file.
Cải tiến lên là sẵn các dạng thép hoặc block att.
Tham khảo từ link bài viết: https://www.cadtutor.net/forum/topic/2139-inserting-block-using-vba/?do=findComment&comment=18870
Thấy bạn đầu tư để xây dựng quá, chúc bạn luôn vui khỏe giữ vững tinh thần đóng góp.
Rất mong được thấy các version update thêm từ bạn.

 

[gpe.vn]

Bạn dùng ObjectDBX để có thể tác động vào file đang đóng >> Bạn có thể dồn toàn bộ block vào trong 1 bản vẽ, sau đó dùng ObjectDBX để có thể add một block bất kỳ trong bản vẽ đó, thay vì bạn đang để riêng lẻ từng file.
Cải tiến lên là sẵn các dạng thép hoặc block att.
Tham khảo từ link bài viết: https://www.cadtutor.net/forum/topic/2139-inserting-block-using-vba/?do=findComment&comment=18870
Thấy bạn đầu tư để xây dựng quá, chúc bạn luôn vui khỏe giữ vững tinh thần đóng góp.
Rất mong được thấy các version update thêm từ bạn.

Cảm ơn bạn, mình sẽ cập nhập 2 vấn đề bạn nói, và học hỏi thêm từ diễn đàn bạn chia sẻ. Xin cảm ơn

 

[longkingk]

Cám ơn Bạn, mong sau này Bạn có nhiều ứng dụng hay hơn

 

[PhanTuHuong]

Tôi chưa xem nhưng khuyên chủ thớt dùng liên kết muộn để tùy biến phiên bản AutoCAD vốn rất nhiều từ 2007 đến 2025 (gần như năm nào cũng có). Chuyên nghiệp hơn thì làm thêm bộ cài để đỡ phải tạo thư mục, copy...

 

[HA1098HA]

Tiếp tục tới đoạn này : Vẽ Autocad dầm bê tông cốt thép từ Excel, Các bạn tải lại file và làm theo thứ tự sau:
1) Chép file CadClick bỏ vào ổ C
2) Mở file autocad lên, nếu ko chương trình sẽ tự mở
3) Mở file excel lên, edit các thông số và nhấn nút 2CAD
4) Khi vẽ xong chương trình sẽ báo OK (thời gian là 2 phút tùy máy tính các bạn nha)

phần mềm của bác rất tuyệt, cảm ơn bác đã chia sẻ. nhưng thay vì tự động vẽ mặt cắt dầm và dán vào tọa độ 0,0 trên cad thì có thể cho phép pick điểm đặt mặt cắt thì tuyệt hơn