Lập trình công thức tính khối lượng trong xây dựng (1 người xem)

[Đinh Duy Hòa]

Để bốc khối lượng đấu thầu thì cần phải tính nhanh mà khối lượng thường rất nhiều và có nhiều mục cách tính thì lặp đi lặp lại, mình muốn lập trình để tính cho nhanh và tương đối chính xác. Ý tưởng cho lập trình như sau:
Ví dụ khi tính bê tông, ván khuôn, cốt thép cho móng thì mình chỉ cần nhập các thông số cần thiết của móng như (chiều dài, chiều rộng, chiều cao, đường kính thép, bước thép) là có khối lượng bê tông, ván khuôn, thép luôn không cần phải đi gõ công thức dài x rộng x cao =khối lượng bê tông nữa

 

[vu_tuan_manh_linh]

Dùng hàm product() đi chế!

 

[Đinh Duy Hòa]

Để bốc khối lượng đấu thầu thì cần phải tính nhanh mà khối lượng thường rất nhiều và có nhiều mục cách tính thì lặp đi lặp lại, mình muốn lập trình để tính cho nhanh và tương đối chính xác. Ý tưởng cho lập trình như sau:
Ví dụ khi tính bê tông, ván khuôn, cốt thép cho móng thì mình chỉ cần nhập các thông số cần thiết của móng như (chiều dài, chiều rộng, chiều cao, đường kính thép, bước thép) là có khối lượng bê tông, ván khuôn, thép luôn không cần phải đi gõ công thức dài x rộng x cao =khối lượng bê tông nữa

Dùng hàm product() đi chế!

Ý mình là lập trình sẵn công thức rồi chỉ cần nhập các thông số cần thiết là tự động ra khối lượng luôn

 

[VetMini]

Loại toán này thì một cái máy tính cầm tay nó cũng tính được. Những cái khá mọt chút, chỉ cần bảo nó nhớ bước thực hiện tính toán, thâu lại. Từ đó về sau chỉ việc mở ra, vào tham số, là lấy kết quả. Cái khó chỉ ở chỗ tra bảng kích thước để lấy cỡ cốt thép thôi.

Function TinhKhoiLuong(byVal cDai as Double, byVal cRong as Double, byVal cCao as Double, byVal phiThep as Double, byVal bcThep as Double) As Variant
Dim a(1 to 3) as Double
a(1) = cDai * cRong * cCao ' luong be tong
a(2) = ???? ' luong van
a(3) = ???? ' luong thep
TinhKhoiLuong = a
End Function

Trên bảng tính, boi đen 3 ô liên tiếp, gõ hàm với tham số và Ctrl+Shift+Enter

 

[Đinh Duy Hòa]

Loại toán này thì một cái máy tính cầm tay nó cũng tính được. Những cái khá mọt chút, chỉ cần bảo nó nhớ bước thực hiện tính toán, thâu lại. Từ đó về sau chỉ việc mở ra, vào tham số, là lấy kết quả. Cái khó chỉ ở chỗ tra bảng kích thước để lấy cỡ cốt thép thôi.

Function TinhKhoiLuong(byVal cDai as Double, byVal cRong as Double, byVal cCao as Double, byVal phiThep as Double, byVal bcThep as Double) As Variant
Dim a(1 to 3) as Double
a(1) = cDai * cRong * cCao ' luong be tong
a(2) = ???? ' luong van
a(3) = ???? ' luong thep
TinhKhoiLuong = a
End Function

Trên bảng tính, boi đen 3 ô liên tiếp, gõ hàm với tham số và Ctrl+Shift+Enter

Cảm ơn bạn đã nhiệt tình trả lời, cái mình cần chính là cái công thức để tính ra cốt thép. Cái này phải cần kỹ sư khối lượng mới đưa ra công thức để rồi từ đó mới lập trình sau

 

[vanle33]

Để bốc khối lượng đấu thầu thì cần phải tính nhanh mà khối lượng thường rất nhiều và có nhiều mục cách tính thì lặp đi lặp lại, mình muốn lập trình để tính cho nhanh và tương đối chính xác. Ý tưởng cho lập trình như sau:
Ví dụ khi tính bê tông, ván khuôn, cốt thép cho móng thì mình chỉ cần nhập các thông số cần thiết của móng như (chiều dài, chiều rộng, chiều cao, đường kính thép, bước thép) là có khối lượng bê tông, ván khuôn, thép luôn không cần phải đi gõ công thức dài x rộng x cao =khối lượng bê tông nữa

Chắc không có 1 file tính toán sẵn cho các loại cấu kiện như bạn nói đâu. Không phải lúc nào khối lượng cũng =PRODUCT(A:Z) đâu.
Mỗi cấu kiện, vị trí cấu kiện, biện pháp thi công, cấu tạo, yêu cầu chính xác ... dẫn đến cách tính khối lượng của chúng là khác nhau.
Bạn có hiểu không?

 

[TheThienChu]

Để bốc khối lượng đấu thầu thì cần phải tính nhanh mà khối lượng thường rất nhiều và có nhiều mục cách tính thì lặp đi lặp lại, mình muốn lập trình để tính cho nhanh và tương đối chính xác. Ý tưởng cho lập trình như sau:
Ví dụ khi tính bê tông, ván khuôn, cốt thép cho móng thì mình chỉ cần nhập các thông số cần thiết của móng như (chiều dài, chiều rộng, chiều cao, đường kính thép, bước thép) là có khối lượng bê tông, ván khuôn, thép luôn không cần phải đi gõ công thức dài x rộng x cao =khối lượng bê tông nữa

Có cách đấy bẹn à.
Thực chất, các công trình có kết cấu tương tự sẽ có chung 1 tỷ lệ nào đó.
Cái này tin hay không tùy bạn, nhưng nhóm bên tôi có cơ sở để tin như vậy.
Nếu đồng ý vậy thì việc của bạn trở nên rất dễ:
Tìm 1 công trình B có kết cấu tương tự với công trình A cần bóc tách. B đã có dự toán
Lấy tỷ lệ giữa A & B rồi nhân với các số liệu dự toán đã có của B sẽ ra được số liệu của A.
Tùy theo mức độ tương đương về kết cấu mà kết quả thu được có sai số khác nhau nhưng nếu biết lựa chọn thì sai số là rất tốt.
Việc bây giờ là chỉ cần tìm 1 dự toán đáng tin cậy là xong.
Thông thường nhóm tôi dùng các thông số này làm khái toán hoặc dùng lập tiến độ. Khi thanh quyết toán phải lập lại chiết tính cụ thể.

 

[PhanTuHuong]

Tóm lại là hỏi hay hướng dẫn đây?

 

[TheThienChu]

Tóm lại là hỏi hay hướng dẫn đây?

Bạn đang nói với ai vậy

 

[VetMini]

Cảm ơn bạn đã nhiệt tình trả lời, cái mình cần chính là cái công thức để tính ra cốt thép. Cái này phải cần kỹ sư khối lượng mới đưa ra công thức để rồi từ đó mới lập trình sau

Thì hỏi kỹ sư chứ sao lại hỏi ở đây.

 

[AutoReply]

Thì hỏi kỹ sư chứ sao lại hỏi ở đây.

kỹ sư viết ra giấy cách tính rồi đem tờ giấy đó quay lại đây hỏi .

 

[VetMini]

kỹ sư viết ra giấy cách tính rồi đem tờ giấy đó quay lại đây hỏi .

Hổng dám đâu. Nghề của mấy thằng thầu. Bảo nó đưa công thức ra chả khác nào bảo nó tự đập bể nồi cơm.

(tuỳ theo thầu, có những người tính theo công thức, có ngừoi tính theo bảng tra, hay cả hai. Dân thực sự chuyên nghiệp thì trắc địa sư khối lượng/quantity surveyor thì có cách tính khác với kỹ sư xây dựng/construction engineer)

 

[M@trixs]

Tôi cũng vừa tính đến phần này. Có vẻ ý tưởng của bạn là trùng với ý tưởng của tôi.
Dàn bài là như thế này: Tìm công thức cho tất cả các công tác cần tính khối lượng, cái này tôi đang đi sưu tầm cách tính đơn giản, nhanh chóng, chính xác và được Thanh tra cũng như Kiểm toán chấp nhận.

Vì có công việc nên chưa sẽ thêm được nhiều, khi đi về tôi sẽ chia sẽ thêm ít thông tin nữa.