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

ptlong04x1

Thành viên
 Xem Hồ Sơ  Xem hoạt động của họ

  • Số lượng nội dung

    74

  • Đã tham gia

  • Lần ghé thăm cuối

Bài đăng được đăng bởi ptlong04x1

  5. Đã đăng · Trả lời báo cáo

    Quá trình thêm hơn khó khăn do có quá nhiều hàng (do chưa quen sẽ khắc phục được). với lại sao bạn nói đã active rồi mà sau 1 hồi mày mò tìm hiểu không biết bấm vào đâu nó lại báo chưa active, nhờ bạn xem lại

    Trong bảng thư viện bạn vẫn sử dụng đc các nút copy chèn, copy xuống cuối bảng và di chuyển thanh nhé, kết hợp thêm 1 số thao tác trong excel là làm đc thôi. Bạn thử bấm vào nút đăng ký lại xem, mình ktra thấy đã active rồi.

  6. Đã đăng · Trả lời báo cáo

    Add in của bác rất ấn tượng

    Nhưng mình hay dùng soft free: Thống kê cốt thép của Delta-TipPro

    Giao diện riêng, xuất sang cad và excel đều ok

     

    Bạn nào cần pm này thì vào đây xem và tải về

    http://adf.ly/6568642/banner/www.xaydung.net.vn/Thong-ke-cot-thep-TIP-3-5--mien-phi-100-_25.aspx

     

     

    :D

     

    Uhm, thì add-in này cũng free mà, dành riêng cho các bạn nghiện Excel :P. Thao tác trên Excel cũng có cái hay.

  17. Đã đăng · Trả lời báo cáo

    Thân chào ae! Mời ae người dùng thử add-in thống kê thép trong Excel do mình viết, chạy trong Excel 2007 & 2010:

     

    27-08-20148-00-17AM.jpg

     

    - Các bạn add file [TkExcel.xlam] vào Excel, sau khi add xong Excel sẽ có thêm tab [TKT 1.0].
    - Trong Tab [TKT 1.0] --> click [Đăng ký] --> nhập địa chỉ Email của bạn vào --> click tiếp [Đăng ký] --> chờ 1 lát để yêu cầu đăng ký được gửi đi --> Sau đó bạn quay lại topic này comment và để lại địa chỉ Email.

    Sau khi làm xong các bước trên mình sẽ kích hoạt cho bạn. Ae bỏ chút thời gian sử dụng và góp ý thêm giúp mình nhé. Thank!

    Hướng dẫn sử dụng:

    + Lưu ý quan trọng: không chèn dòng, chèn cột trong bảng tính có sẵn của chương trình.
    + Bắt đầu tạo bảng thống kê thép bằng cách click [Thêm bảng mới].
    + Click [Thêm] để thêm thanh từ thư viện bằng cách chọn mã số từ cửa thư viện bung ra bên cạnh --> Click [Thêm] 1 lần nữa để hoàn tất.
    + Nhập thông tin ở các ô có màu nền nhạt, các ô màu đậm đã có sẵn công thức; phần ghi chú nếu không muốn dùng, bạn có thể click [Ẩn/Hiện ghi chú] để ẩn đi.
    + Chọn 1 hay nhiều số hiệu thanh, click [Chèn], [Thay], [Xoá] để thực hiện. Tương tự với các chức năng [Copy], [Di chuyển], [sắp xếp].
    + Đứng tại ô bất kỳ, click [Lọc giá trị] để lọc ra các thanh có cùng giá trị với ô đang chọn --> chọn tiếp các ô cần thay đổi giá trị như Đường kính, chiều dài nối (để thấy chiều dài nối click [Ẩn/Hiện ghi chú] để mở ra phần ghi chú chung) --> click [Nhập liệu nhanh] để nhập số liệu cho các ô vừa chọn.
    + Sau khi nhập liệu đầy đủ, click [Tổng hợp thép] để xem kết quả.

    Xử lý khi in ấn:
    + Khi in các bảng thống kê, click [Định dạng CK tự động] để xoay dọc tên và số CK], khi thao tác thống kê nên đưa về dạng hiển thị ban đầu để tốc độ xử lý được nhanh hơn bằng cách click lại vào [Định dạng CK tự động]. Tương tự, có thể chọn các ô chứa tên hoặc số CK để [Định dạng CK thủ công].
    + Có thể chèn thêm các khung tên vào 1 sheet mới sau đó Copy và Paste picture as Link để trình bày trang in có khung tên ngay trong Excel hoặc copy sang Autocad thì tuỳ bạn.

    Chỉnh sửa thư viện, tạo mới, thêm bớt hình dạng thanh:
    + Click [Đóng/Mở CSDL] để mở ra thư viện có sẵn, dùng các tính năng của Excel bạn có thể tạo riêng cho mình 1 thư viện thanh bằng Border hoặc Shape, có thể chia sẻ giữa mọi người để làm phong phú thêm thư viện tuỳ ý bạn.
    + Lưu ý, sau khi mở thư viện ra, bạn không được sử dụng chức năng Save của Excel mà phải dụng nút [Lưu CSDL] để lưu, sau đó click lại [Đóng/Mở CSDL] để đóng thư viện.

     

    Xem clip: http://youtu.be/nc5njDoDTqI

     

    PS: Mình tạm thời gỡ file đính kèm để tiến hành update 1 số tính năng (06-10-2014).

    • Vote tăng 1

  23. Đã đăng · Trả lời báo cáo

    Với thằng Dimrotated không thể nào lấy được toạ độ chân dim nên hiện tại chưa nghĩ được ra cách nào dóng chân Dim bằng code vba.

    Với thằng dimaligned có thể lấy được toạ độ chân dim nhưng code rắc rói vì phải lấy hướng của dim với lại loại này ít dùng.

     

    Mình đã làm thử và cũng gặp các vướng mắc như bạn nói. Không hiểu nguyên lý làm việc trong lisp cắt chân Dim thì sao nhỉ? Bạn nào giải thích giúp mình với!

  24. Đã đăng · Trả lời báo cáo

    Một ví dụ bằng VBA để tạo Dim đây:

     

    Sub Example_AddDimAligned()
   ' This example creates an aligned dimension in model space.

   Dim dimObj As AcadDimAligned
   Dim point1(0 To 2) As Double
   Dim point2(0 To 2) As Double
   Dim location(0 To 2) As Double

   ' Define the dimension
   point1(0) = 5#: point1(1) = 5#: point1(2) = 0#
   point2(0) = 10#: point2(1) = 5#: point2(2) = 0#
   location(0) = 5#: location(1) = 7#: location(2) = 0#

   ' Create an aligned dimension object in model space
   Set dimObj = ThisDrawing.ModelSpace.AddDimAligned(point1, point2, location)
   ZoomAll
End Sub

     

    Dạ ý em không phải là vậy. Em muốn tìm hiểu thuật toán cắt chân dim (cut dim) bằng VBA. Đã có rất nhiều lisp trên diễn đàn thực hiện việc này nhưng e muốn thực hiện nó bằng VBA vì không biết chút gì về lisp.

×