Bảng tổng hợp nhập xuất tồn (1 người xem)

[DMQ]

Chào Các AC, Em có file đính kèm nhờ các AC giúp. Đây là file giả định, nhờ các AC viết code giúp em. Em có ghi rỏ ở sheet TONGHOP .

 

[HUONGHCKT]

Ta tạm dừng chuyện này:

lại cái đã;
Cái mà mình muốn thảo luận với bạn bây giờ là cấu trúc CSDL của bạn

Các trang tính 'Nhap' & 'Xuat' sao bạn không xoay ngang lại
Trang tính luôn có số cột ít hơn số hàng; Mà dữ liệu của bạn thì số lương thực, thực fẩm thì không nhiều, số ngày thì mình chưa rõ, nhưng có thể dùng để xài có cả 1 năm dữ liệu trở lên sẽ có vấn đề ngay.
Theo mình để tính lượng tồn tiền của ngày hôm trước với câu trúc hiện nay sẽ khó hơn trang tính ta xoay đi 90 độ
Nếu vậy có trỡ ngại gì đến các trang tính khác hay không?
Bạn có thể nêu các trỡ ngại đó ra để bàn cách khắc fục.
Chuyện xoay sẽ có người giúp bạn hoàn toàn, bạn đồng í không?

Một chuyện khác nữa, là các loại lương thực, thực fẩm nên có mã, nhưng để bàn sau. . . .

Chờ tin từ bạn.

Cảm ơn bạn nhé!
Xoay 90 độ lại bảng "NHAP" &"XUAT". Đây đúng là vấn đề mình không nghĩ đến, bởi vì mình chỉ thấy để cột thì nó trùng với bến Sheet "N-X LTTP...". Mà sheet "N-X LTTP" mình phải để ngang-không thể không đúng mẫu được.
Có cách nào không, Các bạn giúp mình với. Mình đang rất cần.
Còn vấn đề code hình như chỉ chạy dược 1 lần. Thêm ngày khác thì báo lỗi ở dòng mình bôi đỏ đậm dưới đây
......
MyFormat = Rng.NumberFormat
Rng.NumberFormat = "MM/DD/yyyy"
Rws = Rng.CurrentRegion.Rows.Count
.......
Ô h2 ở sheet "N-X LTTP" mình luôn định dạng là kiểu Việtnam "14 tháng 3 năm 2001".
Nếu bạn nào biết cho thêm cả thứ vào nữa thì thật tuyệt vời.
Giúp mình với nhé, Cảm ơn nhiều!!!
Mong chờ tin các bạn

 

[SA_DQ]

Còn vấn đề code hình như chỉ chạy dược 1 lần. Thêm ngày khác thì báo lỗi ở dòng mình bôi đỏ đậm dưới đây
......
MyFormat = Rng.NumberFormat

Tạm thời bạn thử vô hiệu hóa dòng lệnh đó đi; Bằng cách thêm dấu nháy đơn vô đầu dòng lệnh.
& nhớ vô hiệu hóa dòng lệnh tương tự cuối macro:

'Rng.NumberFormat = MyFormat

Tạm thời là vậy, trong khi chờ . . . . .

 

[HUONGHCKT]

Tạm thời bạn thử vô hiệu hóa dòng lệnh đó đi; Bằng cách thêm dấu nháy đơn vô đầu dòng lệnh.
& nhớ vô hiệu hóa dòng lệnh tương tự cuối macro:

'Rng.NumberFormat = MyFormat

Tạm thời là vậy, trong khi chờ . . . . .

Nhưng nếu vô hiệu dòng đó thì lại lỗi ở dòng tiếp theo. Khẩn thiết mong các anh chị giúp đỡ. Trân trọng cảm ơn!

 

[SA_DQ]

Bạn thử xài bảng mình đã xoay ngang này xem có lỗi như thế nào?

 

[HUONGHCKT]

Cảm ơn bạn HYen17! Mình xem rồi, đúng ý mình rồi, nhưng cho hỏi thêm 1 tý nữa nhé:
- sao nó không chép luôn danh mục LTTP vào dòng 4 (bỏi vì khi mình cần thêm thì lại phải copy sang cả hai bảng (cũng có khi quên).
- Khị chèn thêm dòng ở bảng "N-X LTTP.." thì nó không gán số liệu dòng tổng cộng.
Bạn làm hộ mình với theo hướng là khi thêm tên LTTP vào thì nó tự gán vào dòng 4 của sheet "NHAP"&"XUAT". Và khi chèn thêm dòng ở bảng "N-X LTTP.." thì nó tự động chèn thêm cột ở sheet "NHAP"&"XUAT", như thế cột tổng cộng cũng được gán số liệu theo.
Ở ô H2 bạn có thể cho nó hiện cả là ngày thứ mấy trong tuần được không?
Giúp mình với nhé, sắp có đoàn kiểm tra của Phòng và Sở GD rồi.
Mình cảm ơn bạn nhiều!

 

[ChanhTQ@]

Mình xem & đúng ý mình rồi, nhưng cho hỏi thêm 1 tý nữa nhé:
(1) - sao nó không chép luôn danh mục LTTP vào dòng 4 (bỏi vì khi mình cần thêm thì lại phải copy sang cả hai bảng (cũng có khi quên).
(2)- Khị chèn thêm dòng ở bảng "N-X LTTP.." thì nó không gán số liệu dòng tổng cộng.
Bạn làm hộ mình với theo hướng là khi thêm tên LTTP vào thì nó tự gán vào dòng 4 của sheet "NHAP"&"XUAT". Và khi chèn thêm dòng ở bảng "N-X LTTP.." thì nó tự động chèn thêm cột ở sheet "NHAP"&"XUAT", như thế cột tổng cộng cũng được gán số liệu theo.
(3) Ở ô H2 bạn có thể cho nó hiện cả là ngày thứ mấy trong tuần được không?

(1): Xong;

(3): Xem trong trang tính; Nếu không ưng vậy thì tham khảo & tự sửa đổi.

(2): Làm cho bạn cũng được; Nhưng bạn sinh lười, sau này chũng loại LTTF tăng lên, bạn sẽ sai mà không biết tại sao; Cho nên việc này bạn nên làm bằng tay:

Dời cột công thức tổng này sang fải đến độ zôi an toàn;
FillDown công thức hàng tuần để bảo đảm an toàn & toàn vẹn lãnh thổ trang tính CSDL của bạn!

(4) Bạn cho biết kỹ hơn về tồn ngày hôm trước là sao?
Có fải cộng dồn từ đầu tháng (năm) hay chỉ là số dư của ngày hôm trước?

Chúc vui!

 

[HUONGHCKT]

Em trân trọng Cảm ơn Bác ChanhTQ@ rất nhiều! Bác đã giúp em để em có sổ kịp thời cho đoàn kiểm tra. Tồn ngày hôm trước là số dư của ngày hôm + nhập hôm trước-Xuất hôm trước. Phần này Em đang phải làm thủ công cho kịp. Nhưng E nghĩ có thể dùng hàm Hlookup để dò tham chiếu vào Sheet "Nhap"&"xuất" là có thể được (E chưa thử). Không biết E nghĩ vậy có đúng không? Nếu có cao kiến gì Bác chỉ gùm cho Em với nhé.
Bác cho Em xin thêm đoạn code để "GHI và thoát" vào một nút nữa bác nhé!

 

[ChanhTQ@]

(1) Tồn ngày hôm trước là số dư của ngày hôm + nhập hôm trước-Xuất hôm trước. Phần này Em đang phải làm thủ công cho kịp. Nhưng E nghĩ có thể dùng hàm Hlookup để dò tham chiếu vào Sheet "Nhap"&"xuất" là có thể được (E chưa thử). Không biết E nghĩ vậy có đúng không? Nếu có cao kiến gì Bác chỉ gùm cho Em với nhé.

(2) Bác cho Em xin thêm đoạn code để "GHI và thoát" vào một nút nữa bác nhé!

(1) Mình sẽ thực hiện với khái niệm:
Số tiền dư ngày hôm trước sẽ bằng số dư đầu kì (từng mặt hàng, hiễn nhiên rồi!) cộng thêm số nhập từ đầu kì đến trước ngày khảo sát & trừ đi số xuất trong những ngày í.

Tuy nhiên để bạn tiện kiểm tra từng bước, mình mới làm fần đầu (nghĩa là chưa có fần xuất trước kì)

Cách kiểm tra:

(Bạn cần gỏ ngày khảo sát vô [H2] & {ENTER}; Macro sẽ tính số liệu cho bạn)
File đang có số liệu tồn trước ngày 5/09, thực ra đây là số liệu tồn đầu kỳ, vì trước ngày 5/09 ta không giao dịch mua bán.

Bạn gỏ vô [H2] tăng thêm 1 ngày & kiểm tra số liệu xem thử
Khi nào số đã đúng ta sẽ sang bước sau

 

[HUONGHCKT]

Em Cảm ơn Bác ChanhTQ@ rất nhiều!
E kiểm tra rồi rất đúng với cách E phải làm rồi: Tồn hôm trước = Dư đầu kỳ + lũy kế nhập đến ngày cần tính- Lũy kế xuất đến ngày ấy.
Bác cố giúp E cho trọn vẹn bác nhé.
Mong tin Bác nhiều!
Trân trọng !

 

[ChanhTQ@]

Em Cảm ơn Bác ChanhTQ@ rất nhiều!
E kiểm tra rồi rất đúng với cách E phải làm rồi: Tồn hôm trước = Dư đầu kỳ + lũy kế nhập đến ngày cần tính- Lũy kế xuất đến ngày ấy.
Bác cố giúp E cho trọn vẹn bác nhé. Mong tin Bác nhiều!
Trân trọng !

Thật ra mình làm xong từ trước khi đưa file lên; Nhưng e rằng bạn rối khi kiểm tra thôi.
Mà bạn kiểm lâu thật í!

Chúc ngày cuối tuần vui vẻ.

(Bạn nhấn 'OK' để mình còn tháo file bài trước; thu hồi tài nguyên.)

 

[HUONGHCKT]

Cảm ơn Bác ChanhTQ@ nhiều nhiều!
Em đã nhận được file bác gủi cho em. Thật đúng ý E- Bác thật là tuyệt vời. Nhưng cho em hỏi là có thể làm để truy ngược lại được không? Bởi vì các ô của phần ăn bán trú và ăn Ko bán trú em làm bằng hàm VLOOKUP, trên cơ sở thực đơn và định lượng được thiết lập từ trước. Chỉ có phần nhập (gồm các ô từ B12-B19-LT+chất đốt +gia vị khô mua sẵn 1 lần) là phải nhập vào bằng bàn phím, còn các ô từ B20=O20 ....Khi truy ngược lại các ô nhập vào có tự gán số liệu từ sheet "NHAP" để thể hiện lại trang tính của ngày cần truy ko? Nếu làm được thì Bác giúp Em với.
Trân thành cảm ơn Bác!

 

[ChanhTQ@]

Đọc câu này muốn hụt hơi, lấy sức đâu để hiểu đây hở trời!
[thongbao] Chỉ có phần nhập (gồm các ô từ B12-B19-LT+chất đốt +gia vị khô mua sẵn 1 lần) là phải nhập vào bằng bàn phím còn các ô từ B20- B..) là bằng phần chi những ô này khi truy ngược cũng tự có số liệu-chỉ các ô nhập vào có tự gán số liệu từ phần Nhạp để thể hiện lại trang tính của ngày cần truy lại hay không?[/thongbao]

 

[ChanhTQ@]

Đọc câu này muốn hụt hơi, lấy sức đâu để hiểu đây hở trời!
[thongbao] Chỉ có phần nhập (gồm các ô từ B12-B19-LT+chất đốt +gia vị khô mua sẵn 1 lần) là phải nhập vào bằng bàn phím còn các ô từ B20- B..) là bằng phần chi những ô này khi truy ngược cũng tự có số liệu-chỉ các ô nhập vào có tự gán số liệu từ phần Nhạp để thể hiện lại trang tính của ngày cần truy lại hay không?[/thongbao]

 

[HUONGHCKT]

Cảm ơn Bác ChanhTQ@ nhiều nhiều!
Em đã nhận được file bác gủi cho em. Thật đúng ý E- Bác thật là tuyệt vời. Nhưng cho em hỏi là có thể làm để truy ngược lại được không? Bởi vì các ô của phần ăn bán trú và ăn Ko bán trú em làm bằng hàm VLOOKUP, trên cơ sở thực đơn và định lượng được thiết lập từ trước. Chỉ có phần nhập (gồm các ô từ B12-B19-LT+chất đốt +gia vị khô mua sẵn 1 lần) là phải nhập vào bằng bàn phím, còn các ô từ B20=O20 ....Khi truy ngược lại các ô nhập vào có tự gán số liệu từ sheet "NHAP" để thể hiện lại trang tính của ngày cần truy ko? Nếu làm được thì Bác giúp Em với.
Trân thành cảm ơn Bác!

 

[ChanhTQ@]

[B19] đang là 'tỏi củ'
Theo mình hiểu thì từ dòng 12 đến dòng 19 này là cần tính 'Tồn hôm trước'; Còn dưới đó thì không cần tính nữa, fải không?

Ngược lại, khi chép sang 'Nhap' hay 'Xuat' thì chỉ chép số liệu trên dòng 20 của chúng thôi, fải không?
Còn lại là tính theo định suất ghi trên các dòng 4 & 5?

???

 

[HUONGHCKT]

Ý Em là các dòng từ 12 -19 là cần truy ngược còn các dòng từ 20 đến ... thì nó tự bằng với tổng xuất rồi. và như thế số tồn hôm trước cũng thể hiện được.
Em copy code của bác sang file của E và chèn thêm 2 dòng phía trên dòng 9 nhưng không chay được-nó báo lỗi . Em sửa thành
.......
[aa4].Value = Nh.[a1].Value '<-|Ngày Luu Tòn'
[ab4].Value = Target.Value '''Nh.Cells(2, Cls.Row - 10).Value '_
Cls.Offset(, 3).Value = WF.DSum(nRg, nRg(1).Offset(, Cls.Row - 13), [AA1:AB2]) - WF.DSum(xRg, xRg(1).Offset(, Cls.Row - 13), [AA1:AB2]).
nó vẫn báo lỗi ở dòng E bôi đỏ, E không biết sửa, đành theo gợi ý của bác ở ô AA6 để tính cũng tính được bác ạ.
Cảm ơn bác nhiều!