Đến nội dung


Hình ảnh
- - - - -

Add-in Thống kê thép trên Excel 2007 & 2010


  • Please log in to reply
52 replies to this topic

#21 ptlong04x1

ptlong04x1

    biết vẽ polygon

  • Members
  • PipPip
  • 75 Bài viết
Điểm đánh giá: 8 (bình thường)

Đã gửi 03 September 2014 - 08:25 AM

Nhờ chủ thớt sửa lỗi file not found khi mình đánh xong đỉa chỉ mail và kích đăng ký thì báo lỗi như vậy.

Bạn TiepDHXD để mình xem lại lỗi rồi trả lời sau nhé.


  • 0

#22 ptlong04x1

ptlong04x1

    biết vẽ polygon

  • Members
  • PipPip
  • 75 Bài viết
Điểm đánh giá: 8 (bình thường)

Đã gửi 03 September 2014 - 08:28 AM

Cám ơn bạn đã chia sẽ, bạn có thể bổ sung thêm nhiều hình dạng thép nữa được không, mình thấy còn thiếu nhiều lắm

Email: huunhantvxdts@gmail.com

 

Phần hình dạng thanh bạn linh động tạo thêm trong mục [Hiệu chỉnh CSDL] nhé, mình có nói ở bài đầu rồi, có thể dùng border hoặc shape.


  • 0

#23 loinv

loinv

    biết vẽ pline

  • Members
  • PipPip
  • 62 Bài viết
Điểm đánh giá: 19 (tàm tạm)

Đã gửi 03 September 2014 - 11:31 AM

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/656864...hi-100-_25.aspx

 

 

:D


  • 0

#24 ptlong04x1

ptlong04x1

    biết vẽ polygon

  • Members
  • PipPip
  • 75 Bài viết
Điểm đánh giá: 8 (bình thường)

Đã gửi 03 September 2014 - 01:51 PM

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/656864...hi-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.


  • 0

#25 dhxd55

dhxd55

    Chưa sử dụng CAD

  • Members
  • Pip
  • 2 Bài viết
Điểm đánh giá: 0 (bình thường)

Đã gửi 03 September 2014 - 04:03 PM

Ban kich hoat giup minh theo dia chi: huynh.leprocons@gmail.com


  • 0

#26 huunhantvxdts

huunhantvxdts

    biết dimbaseline

  • Members
  • PipPipPipPipPip
  • 366 Bài viết
Điểm đánh giá: 53 (tàm tạm)

Đã gửi 03 September 2014 - 04:50 PM

Phần hình dạng thanh bạn linh động tạo thêm trong mục [Hiệu chỉnh CSDL] nhé, mình có nói ở bài đầu rồi, có thể dùng border hoặc shape.

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


  • 0

#27 ptlong04x1

ptlong04x1

    biết vẽ polygon

  • Members
  • PipPip
  • 75 Bài viết
Điểm đánh giá: 8 (bình thường)

Đã gửi 03 September 2014 - 05:14 PM

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.


  • 0

#28 ptlong04x1

ptlong04x1

    biết vẽ polygon

  • Members
  • PipPip
  • 75 Bài viết
Điểm đánh giá: 8 (bình thường)

Đã gửi 03 September 2014 - 05:18 PM

Đã kích hoạt cho bạn:

huynh.leprocons@gmail.com


  • 0

#29 huunhantvxdts

huunhantvxdts

    biết dimbaseline

  • Members
  • PipPipPipPipPip
  • 366 Bài viết
Điểm đánh giá: 53 (tàm tạm)

Đã gửi 03 September 2014 - 08:14 PM

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.

Đã báo đăng ký thành công cám ơn bạn nhiều


  • 0

#30 nguoitomo

nguoitomo

    biết vẽ circle

  • Members
  • PipPip
  • 31 Bài viết
Điểm đánh giá: 7 (bình thường)

Đã gửi 04 September 2014 - 10:57 AM

cho mình với

vtaivn@hotmail.com


  • 0

#31 ptlong04x1

ptlong04x1

    biết vẽ polygon

  • Members
  • PipPip
  • 75 Bài viết
Điểm đánh giá: 8 (bình thường)

Đã gửi 04 September 2014 - 01:47 PM

Bạn vtaivn@hotmail.com xem hướng dẫn ở bài đầu nhé.


  • 0

#32 bach1212

bach1212

    biết lệnh trim

  • Members
  • PipPipPip
  • 190 Bài viết
Điểm đánh giá: 5 (bình thường)

Đã gửi 04 September 2014 - 01:53 PM

Tò mò quá. Mình cũng vừa đăng ký nhé: bach1212@gmail.com


  • 0

Một môn tập luyện mang lại vô vàn lợi ích sức khỏe cho mọi người, nhiều bệnh tật nan y đều được chữa khỏi, hoàn toàn miễn phí. Hiệu quả chữa khỏi bệnh tật của nó lên đến hơn 90%.
Tài liệu tại đây: http://phapluan.org/

Rất vui được làm quen với mọi người trên facebook:
https://www.facebook...67946371&type=1

 

 


#33 ptlong04x1

ptlong04x1

    biết vẽ polygon

  • Members
  • PipPip
  • 75 Bài viết
Điểm đánh giá: 8 (bình thường)

Đã gửi 04 September 2014 - 02:03 PM

Tò mò quá. Mình cũng vừa đăng ký nhé: bach1212@gmail.com

Đã kích hoạt cho bạn.


  • 1

#34 HungDHXD

HungDHXD

    biết vẽ ellipse

  • Members
  • PipPip
  • 51 Bài viết
Điểm đánh giá: 6 (bình thường)

Đã gửi 06 September 2014 - 01:12 PM

Đã kích hoạt cho bạn.

  tác giả nên bổ sung thêm cho hệ điều hành 64 bits nữa , ví dụ :

Option Explicit
#If VBA7 Then
Private Declare PtrSafe Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" _
  (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, _
   ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long
   
Public Declare PtrSafe Function FindWindow Lib "user32" Alias "FindWindowA" ( _
    ByVal lpClassName As String, _
    ByVal lpWindowName As String) As Long

Public Declare PtrSafe Function DefWindowProc Lib "user32.dll" Alias "DefWindowProcW" ( _
    ByVal hwnd As LongPtr, _
    ByVal wMsg As Long, _
    ByVal wParam As Long, _
    ByVal lParam As Long) As Long
#Else
Private Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" _
  (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, _
   ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long
   
Public Declare Function FindWindow Lib "user32" Alias "FindWindowA" ( _
    ByVal lpClassName As String, _
    ByVal lpWindowName As String) As Long

Public Declare Function DefWindowProc Lib "user32.dll" Alias "DefWindowProcW" ( _
    ByVal hwnd As Long, _
    ByVal wMsg As Long, _
    ByVal wParam As Long, _
    ByVal lParam As Long) As Long
#End If

  • 0

#35 tranthach.vtv.vn@gmail.com

tranthach.vtv.vn@gmail.com

    biết vẽ arc

  • Members
  • PipPip
  • 46 Bài viết
Điểm đánh giá: -3 (bình thường)

Đã gửi 07 September 2014 - 09:34 AM

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

 

Tải file: http://www.cadviet.c...954_tkexcel.rar

tranthach05@gmail.com . Bạn kích hoạt giùm nhé.


  • 0

                                                                                                                                                                                            126268_chukyt.jpg


#36 tranthach.vtv.vn@gmail.com

tranthach.vtv.vn@gmail.com

    biết vẽ arc

  • Members
  • PipPip
  • 46 Bài viết
Điểm đánh giá: -3 (bình thường)

Đã gửi 07 September 2014 - 09:35 AM

Bạn kích hoạt giùm nhé! 


  • 0

                                                                                                                                                                                            126268_chukyt.jpg


#37 ptlong04x1

ptlong04x1

    biết vẽ polygon

  • Members
  • PipPip
  • 75 Bài viết
Điểm đánh giá: 8 (bình thường)

Đã gửi 08 September 2014 - 08:17 AM

Đã kích hoạt cho bạn: tranthach05@gmail.com


  • 0

#38 phanlytq

phanlytq

    Chưa sử dụng CAD

  • Members
  • Pip
  • 1 Bài viết
Điểm đánh giá: 0 (bình thường)

Đã gửi 13 September 2014 - 07:30 AM

Cảm ơn bạn đã chia sẻ email của mình là:

phanlytq@gmail.com


  • 0

#39 nguyen_man

nguyen_man

    Chưa sử dụng CAD

  • Members
  • Pip
  • 1 Bài viết
Điểm đánh giá: 0 (bình thường)

Đã gửi 01 December 2014 - 07:06 PM

Nhờ chủ thớt sửa lỗi file not found khi đánh địa chỉ mail vào và click đăng ký


  • 0

#40 trantrong

trantrong

    Chưa sử dụng CAD

  • Members
  • Pip
  • 1 Bài viết
Điểm đánh giá: 0 (bình thường)

Đã gửi 03 December 2014 - 09:33 PM

cám ơn bạn đã chia sẻ thông tin tuyệt vời này. mình đã đăng ký xong và kích hoạt

trantrongtb@gmail.com

thanks


  • 0