Dùng VBA để lập bảng chiết tính trong dự toán xây dựng công trình (1 người xem)

[minhcong.tckt]

Em gửi anh chị file excel có các sheet chính sau:
1/ "Thông tin": Sheets chứa các thông tin về thuế suất VAT, lợi nhuận, trực tiếp phí, chi phí chung
2/ "Tienluong": Chứa thông tin về số lượng "công việc" trong xây dựng
3/ GNC: Thông tin về giá nhân công
4/GVL: Thông tin về giá vật liệu
5/GM: Thông tin về giá ca máy
6/DM: Bảng tổng hợp định mức theo "công việc"
7/Chiết tính: Chiết tính đơn giá chi tiết của công việc có trong bảng tiên lượng, giá nhân công lấy bên sheet GNC, giá vật liệu lấy bên sheet GVL, giá máy lấy bên sheets CM, định mức công việc lấy theo sheet DM, phần đuôi của mỗi công việc ( thu nhập trước thuế, thuế GTGT....) sẽ lấy số liệu của sheet "Thông tin"

Giờ em muốn từ 6 sheet theo thứ tự ở trên chứa các thông tin cần thiết, khi ấn nút thực hiện tại sheet " chiết tính" thì bảng chiết tính hiện ra như mẫu em gửi kèm
( Liệt kê đủ công việc có trong bảng tiên lượng và tính toán theo mẫu biểu)

 

[minhcong.tckt]

Có ai viết giúp em code hoặc cho file gần tương tự cũng được ạ

 

[♫ђöล♥ßล†♥†µ♫]

Có ai viết giúp em code hoặc cho file gần tương tự cũng được ạ

Viết làm gì cho cực vậy trời. Nhà họ bỏ ra 2tr mua 1 bản khoá cứng về tha hồ mà lập dự toán với dự thầu

 

[minhcong.tckt]

Viết làm gì cho cực vậy trời. Nhà họ bỏ ra 2tr mua 1 bản khoá cứng về tha hồ mà lập dự toán với dự thầu

Tiền công ty bỏ ra 2tr thì dễ, chứ mình bỏ tiền túi ra thì khác đó
Vì file này chỉ để hỗ trợ nho nhỏ trong công việc thôi chứ còn phải hoàn thiện nhiều nữa
bạn giúp được mình thì viết giúp mình với,

 

[♫ђöล♥ßล†♥†µ♫]

Tiền công ty bỏ ra 2tr thì dễ, chứ mình bỏ tiền túi ra thì khác đó
Vì file này chỉ để hỗ trợ nho nhỏ trong công việc thôi chứ còn phải hoàn thiện nhiều nữa
bạn giúp được mình thì viết giúp mình với,

Bây giờ độ lười nó cao quá Anh ạ. Mà Em thấy các Bác giảm đi 1 cuộc nhậu là đủ mà . Trong em đang dùng cái Bắc Nam. Họ viết bằng Excel sử dụng dễ và đủ hết các phần

 

[minhcong.tckt]

Bây giờ độ lười nó cao quá Anh ạ. Mà Em thấy các Bác giảm đi 1 cuộc nhậu là đủ mà . Trong em đang dùng cái Bắc Nam. Họ viết bằng Excel sử dụng dễ và đủ hết các phần

Mình thấy VBA rất hay, nhưng mình ko biết viết code, chỉ ứng dụng được phần nào thôi, còn kết hợp với công thức trong excel
Nhưng phần chiết tính này nó liệt kê ra từ bảng tiên lượng thì ko thể dùng công thức đơn thuần được ( nếu có được thì tốn rất nhiều dòng thừa ko cần thiết)

 

[minhcong.tckt]

Trong bảng chiết tính đó vừa dùng VBA và dùng công thức thông thường thì làm như thế nào vậy các bác?
Mình sử dụng hàm Find hay vòng lặp For each Next vậy?

 

[CHAOQUAY]

Trong bảng chiết tính đó vừa dùng VBA và dùng công thức thông thường thì làm như thế nào vậy các bác?
Mình sử dụng hàm Find hay vòng lặp For each Next vậy?

Tức là dùng vba điền công thức xuống sheet?
Nếu đúng thế thì bạn thử code dưới đây.

Sub dct()
Dim i As Integer, j As Integer
With Sheet1
    For i = 1 To 5
        For j = 1 To 6
            .Cells(i, j) = "=(column()-1)*5+row()"
        Next j
    Next i
End With
End Sub