Copy nội dung hóa từ sheet hóa đơn sang sheet tổng

[thienkimta]

Xin chào mọi người,
Em cần làm thống kê doanh số. Qui trình như sau :
(1) Nhâp thông tin số lượng vào bảng tính tiền.
(2) Lọc lấy phần thông tin hóa đơn ở bên dưới bảng nhập. Copy thông tin hóa đơn tính được đưa vào bảng Tổng.
(3) Lấy thông tin ở bảng tổng (không bao gồm số lượng tính chi tiết) đưa vào bảng tổng kết.
Vì mỗi ngày để phát sinh hóa đơn mới. Cần nhập để lất tổng theo dõi doanh số tổng.
Em có quay lại qui trình làm, tuy nhiên file lớn không đính kèm lên được.
Em để ở link này

Untitled folder - Google Drive

drive.google.com

Do không biết VBA, nên e làm thủ công.
Thao tác chậm và mất nhiều thời gian, nên không biết thể tự động hóa qui trình được không?
Mong các anh chị em giúp đỡ. Em cám ơn nhiều.

 

[Maika8008]

Xin chào mọi người,
Em cần làm thống kê doanh số. Qui trình như sau :
(1) Nhâp thông tin số lượng vào bảng tính tiền.
(2) Lọc lấy phần thông tin hóa đơn ở bên dưới bảng nhập. Copy thông tin hóa đơn tính được đưa vào bảng Tổng.
(3) Lấy thông tin ở bảng tổng (không bao gồm số lượng tính chi tiết) đưa vào bảng tổng kết.
Vì mỗi ngày để phát sinh hóa đơn mới. Cần nhập để lất tổng theo dõi doanh số tổng.
Em có quay lại qui trình làm, tuy nhiên file lớn không đính kèm lên được.
Em để ở link này

Untitled folder - Google Drive

drive.google.com

Do không biết VBA, nên e làm thủ công.
Thao tác chậm và mất nhiều thời gian, nên không biết thể tự động hóa qui trình được không?
Mong các anh chị em giúp đỡ. Em cám ơn nhiều.

2 thông tin: 06/04/2022 và HCM không lấy được từ bảng nào chính thức hay sao mà phải lấy từ cột A ngoài bảng tính tiền vậy bạn?
Còn cái BV3 kia có khi nào được mang số liệu qua bảng tổng không? Nếu có thì phải thêm ví dụ để biết mà làm chứ

 

[Maika8008]

2 thông tin: 06/04/2022 và HCM không lấy được từ bảng nào chính thức hay sao mà phải lấy từ cột A ngoài bảng tính tiền vậy bạn?
Còn cái BV3 kia có khi nào được mang số liệu qua bảng tổng không? Nếu có thì phải thêm ví dụ để biết mà làm chứ

Bấm nút chạy thủ tục tổng hợp. Những thông tin không ở trong mẫu được lấy đúng tại cell bạn nhập. Cái BV3 coi như không bao giờ có phát sinh.

 

[thienkimta]

2 thông tin: 06/04/2022 và HCM không lấy được từ bảng nào chính thức hay sao mà phải lấy từ cột A ngoài bảng tính tiền vậy bạn?
Còn cái BV3 kia có khi nào được mang số liệu qua bảng tổng không? Nếu có thì phải thêm ví dụ để biết mà làm chứ

"06/04/2022 và HCM" phần để trong vùng của page là vùng in ra gởi cho khách, nên các thông tin ko liên quan ko nhập vào. 2 thông tin bạn hỏi là để lưu, ko liên quan phần gởi khách.

phần BV3 cũng giống 2 phần trên, cũng link qua tổng luôn. nhưng ko phải lúc nào cũng phát sinh cùng lúc 3 phần BV1, Bv2, Bv3. nhiều khi chỉ có 1 phần, hoặc 2, hoặc cả 3.

 

[Maika8008]

"06/04/2022 và HCM" phần để trong vùng của page là vùng in ra gởi cho khách, nên các thông tin ko liên quan ko nhập vào. 2 thông tin bạn hỏi là để lưu, ko liên quan phần gởi khách.

phần BV3 cũng giống 2 phần trên, cũng link qua tổng luôn. nhưng ko phải lúc nào cũng phát sinh cùng lúc 3 phần BV1, Bv2, Bv3. nhiều khi chỉ có 1 phần, hoặc 2, hoặc cả 3.

Để lưu hay gửi khách thì cũng phải code. Tôi hỏi là để khỏi viết code mất công. Chừ viết rồi thì bạn cứ dùng file đó mà thử.

 

[thienkimta]

cám ơn bạn nhiều lắm, mình coi file rồi, chạy rất tốt. còn thiếu phần bv3 nữa. với thêm phần copy qua sheet tổng hợp 3. bạn có thể giúp mình được ko.
Cám ơn bạn nhiều.

Bài đã được tự động gộp: 13/4/22

Để lưu hay gửi khách thì cũng phải code. Tôi hỏi là để khỏi viết code mất công. Chừ viết rồi thì bạn cứ dùng file đó mà thử.

Vâng. mình thử rồi. Mình muốn nhờ hoàn thiện thêm phần cuối. Mình có thể nhắn tin riêng cho bạn được không?
P/s: sao cái mã momo của bạn mình ko quét dc. hic nên muốn hỏi số đt momo.

 

[Maika8008]

cám ơn bạn nhiều lắm, mình coi file rồi, chạy rất tốt. còn thiếu phần bv3 nữa. với thêm phần copy qua sheet tổng hợp 3. bạn có thể giúp mình được ko.
Cám ơn bạn nhiều.

Bạn muốn copy thế nào chứ file ở bài #1 tôi không thấy nên không biết phải copy thứ gì, đến đâu?

 

[Maika8008]

Bạn muốn copy thế nào chứ file ở bài #1 tôi không thấy nên không biết phải copy thứ gì, đến đâu?

Tôi mới vừa xem video của bạn nên thêm mấy lệnh copy và thêm cái BV3

 

[BuiQuangThuan]

Góp vui thêm 1 cách đúng các thao tác trong video

Sub ABC()
Dim Rng As Range, iR&, iR1&, iR2&, j&, K&
Set Rng = Sheets("tinh tien").Range("C62:T156")
Rng.AutoFilter 11, ">" & 0
With Sheets("tong ket")
    iR = .Range("B" & Rows.Count).End(3).Row + 3
    Rng.SpecialCells(12).Copy
    .Range("A" & iR).PasteSpecial xlPasteValues
    .Range("N" & iR).Delete Shift:=xlToLeft
    iR1 = .Range("B" & Rows.Count).End(3).Row
    .Range("L" & iR).Value = "=SUM(K" & iR + 1 & ":K" & iR1 & ")"
    iR2 = Sheets("sheet3").Range("A" & Rows.Count).End(3).Row + 1
    For j = 1 To 17
        If .Cells(iR, j) <> Empty Then
            K = K + 1
            Sheets("sheet3").Cells(iR2, K).Value = .Cells(iR, j).Value
        End If
    Next
End With
Sheets("tinh tien").AutoFilterMode = False
End Sub

 

[thienkimta]

Tôi mới vừa xem video của bạn nên thêm mấy lệnh copy và thêm cái BV3

Cám ơn bạn nhiều. Mình muốn chỉnh sửa và hoàn thiện cả qui trình, nếu được nhờ bạn giúp.

 

[Maika8008]

Cám ơn bạn nhiều. Mình muốn chỉnh sửa và hoàn thiện cả qui trình, nếu được nhờ bạn giúp.

Về vấn đề bạn hỏi trong file:
"Nhờ tư vấn:
Về trình tự trước giờ làm thủ công
1- Nhập phần thông tin ở trang bên trên (từ hàng 1 tới 55). đó là phiếu chi tiết tính tiền hàng. sẽ gởi khách phiếu đó.
2- nhập lại thông tin như vậy (thủ công) để ra được bảng như ở sheet2. (bảng đó sẽ cộng số tiền cộng dồn có được mỗi ngày)
==> vì 2 bước này có sự lặp lại việc nhập số, nên mình mới tạo ra phần trung gian bên dưới này (row62 tới 156). với thao tác lọc những chỗ có kết quả ko phải số 0. rồi copy qua sheet2.
==> câu hỏi : có thể bỏ qua phần trung gian bên dưới, và chạy thẳng từ thông tin nhập ở phần chính bên trên hay ko? Nếu được thì nhờ bạn giúp code. còn nếu không thì thôi."

Tôi đã code lấy thẳng ở phần phiếu tính tiền bên trên nên bạn có thể bỏ phần trung gian bên dưới được rồi.

Còn các việc còn lại, khi nào xong tôi sẽ gửi file lên

 

[Maika8008]

File cho bạn.
Bạn chạy thử, có gì cần chỉnh sửa thì báo lại.