Tồn kho - các anh chỉ giúp e cách làm

[dailykem]

cách tính tồn lại các mã hàng - các anh chỉ giúp e cách làm

e có file đính kèm ký hiệu mã hàng VD: 43/2 DC25
mỗi lần tính tồn các loại mã hàng này khá là vất vả (nếu dữ liệu nhiều, làm e hoa hết cả mắt)
các anh chỉ bảo giúp e cách tính để biết còn lại kho các mã hàng trên ạ
e cám ơn !!
các yêu cầu cần giúp đỡ e đã viết trong file các a xem giúp e

 

[bebo021999]

Bạn ơi, cột nhập, xuất thường là số liệu, nhưng đây toàn là ký hiệu mã hàng, làm sao tính tồn kho? Bạn có thể giải thích kỹ hơn để mọi người có thể giúp bạn

 

[dungechip]

các bác ơi mình cũng có một file này muốn nhờ các bác trợ giúp, trong file mình đã tính được XNT trong kho rồi nhưng nghẹt cái bây giờ muốn cho nó ra cái thẻ kho thì phải làm cánh nào, quả nhiên mình cảm thấy yếu về vấn đề này qua', trong file gởi chỉ có phiếu nhập phiếu xuất và bản XNT thôi, mình muốn mở thêm 1 sheet thẻ kho quản lý mã hàng nữa mà sao khó quá. Nếu có bác nào chỉ giúp trước hết cho mình cảm ơn vì mình đang đâu đầu qua', có gì thì xem file mình gởi và giúp mình bằng cánh gởi qua mail ledung.ltd86@gmail.com hoặc chát trực tiếp với mình qua nick ledung.ltd86 nha, hay con cánh khác nếu giúp được hãy post lên diễn đàng để anh em cùng học hỏi luôn.http://www.mediafire.com/?vzsu40oo5onc98s

 

[khunglongcodon]

e có file đính kèm ký hiệu mã hàng VD: 43/2 DC25
mỗi lần tính tồn các loại mã hàng này khá là vất vả (nếu dữ liệu nhiều, làm e hoa hết cả mắt)
các anh chỉ bảo giúp e cách tính để biết còn lại kho các mã hàng trên ạ
e cám ơn !!
các yêu cầu cần giúp đỡ e đã viết trong file các a xem giúp e

Có bác nào giải thích dùm em file đính kèm này không?
Em đọc mãi mà chả hiểu tồn tính ra mần răng cả?

 

[bebo021999]

À thì ra dailykem ghi nhận NXT theo dạng như sau :
Nhập : 234/2 AB27 (n đơn vị)
Xuất : 234/2 AB27 (n đơn vị)
Tồn : 234/2 AB27-234/2 AB27 = 0
Tại sao bạn không tạo thêm cột dành cho mã hàng, tên hàng; còn các cột nhập , xuất , tồn là thể hiện số lượng? (Cả thế giới hiện đang làm)

 

[nhung2008]

Bạn ơi mình thiết kế đơn giản để bạn tham khảo. Xem có đúng như bạn đang cần ko

View attachment GPE.rar

 

[dailykem]

Cám ơn bạn Nhung2008 đã giúp mình
nó chưa đúng ý mình vì có lẽ mình chưa giải thích cặn kẽ nên bạn chưa hiểu ý
thực ra mỗi mã hàng là 1 loại mặt hàng
sau khi xuất các mã hàng đấy ra cho 1 người thì cuối tháng mình cần tổng kết các mã hàng đã xuất cho những ai mà còn tồn các mã hàng nào, của ai còn tồn mã hàng gì
các mã hàng được tuân theo qui luật sau:
VD: 238/2 AS04
thì chỉ có số /2 là cố định còn lại các ký tự khác thay đổi
e nghĩ chưa ra dùng cách nào vì nó bao gồm cả chữ và số (kể cả việc tách thành 2-3 cột trong 1 mã)
nếu tính nhẩm theo cách phổ thông (nhập 345/2 DG89 và 51/2 BH24, xuất cho Ng Văn A: 345/2 DG 89, còn tồn 51/2 BH24) thì cũng đơn giản nhưng mất nhiều time vì số lượng tương đối nhiều

 

[concogia]

Cám ơn bạn Nhung2008 đã giúp mình
nó chưa đúng ý mình vì có lẽ mình chưa giải thích cặn kẽ nên bạn chưa hiểu ý
thực ra mỗi mã hàng là 1 loại mặt hàng
sau khi xuất các mã hàng đấy ra cho 1 người thì cuối tháng mình cần tổng kết các mã hàng đã xuất cho những ai mà còn tồn các mã hàng nào, của ai còn tồn mã hàng gì
các mã hàng được tuân theo qui luật sau:
VD: 238/2 AS04
thì chỉ có số /2 là cố định còn lại các ký tự khác thay đổi
e nghĩ chưa ra dùng cách nào vì nó bao gồm cả chữ và số (kể cả việc tách thành 2-3 cột trong 1 mã)
nếu tính nhẩm theo cách phổ thông (nhập 345/2 DG89 và 51/2 BH24, xuất cho Ng Văn A: 345/2 DG 89, còn tồn 51/2 BH24) thì cũng đơn giản nhưng mất nhiều time vì số lượng tương đối nhiều

Không cần quan tâm tới quy luật của mã hàng vì "mỗi mã hàng là 1 loại mặt hàng"
Bạn thử chạy code này

Public Sub NgoNgo()
    Dim Vung, VungDo, I, Cll, iDau, iCuoi, Mg(), K
    Set Vung = Range([c1], [c10000].End(xlUp))
    iDau = 2: K = 1:  [e2:e1000].ClearContents
        For I = 3 To Vung.Rows.Count + 1
            If Vung(I).Offset(, -1) <> vbNullString Or I = Vung.Rows.Count + 1 Then
                iCuoi = I - 1
                Set VungDo = Range(Cells(iDau, 3), Cells(iCuoi, 3))
                ReDim Mg(1 To VungDo.Rows.Count, 1 To 1)
                    For Each Cll In VungDo
                        If Application.WorksheetFunction.CountIf(VungDo.Offset(, 1), Cll) = 0 Then
                            Mg(K, 1) = Cll
                            K = K + 1
                        End If
                    Next Cll
                        Vung(iDau).Offset(, 2).Resize(K, 1) = Mg
                        iDau = I
                        K = 1
            End If
        Next I
End Sub

Bạn thêm một ít dữ liệu, thò anh tý vào cell E1 chỗ có chữ "Tồn", bấm cho nó một phát rồi xem kết quả nhé, hy vọng trúng nếu trật thì "tình tình tứ" nhé
Thân

 

[dailykem]

bây giờ e có thêm 1 vùng dữ liệu nữa ( tổng cộng 2 vùng) và thêm 1 vùng xuất dữ liệu nữa ( tổng 2 vùng xuất) thì e phải làm thế nào ạ
nhờ bác concogia giúp sưc tiếp

 

[concogia]

bây giờ e có thêm 1 vùng dữ liệu nữa ( tổng cộng 2 vùng) và thêm 1 vùng xuất dữ liệu nữa ( tổng 2 vùng xuất) thì e phải làm thế nào ạ
nhờ bác concogia giúp sưc tiếp

Bạn cho mình hỏi là kết quả xuất ra như thế nào ? 1 hay 2 cột, nếu một cột mà không đủ hàng để thể hiện thì phải "mần" sao ? ( thí dụ trường hợp bạn nhập người sử dụng Nguyễn Văn Cò 2 lần mỗi lần 8 mã hàng ( 8 dòng) , bạn xuất 2 lần 4 mã hàng, lúc này ta chỉ có 8 dòng để thể hiện 12 mã hàng còn tồn ra sao ???.Híc. Bạn "quánh" vào bảng cái kết quả bạn muốn thể hiện xem "mặt mũi" nó ra sao nhé.
Thân

 

[dailykem]

dạ dữ liệu tồn kho xuất ra 1 cột thôi ạ ( theo đúng như file e làm ý ạ)
còn vấn đề a nghĩ giúp e về không đủ dòng thì a không phải lo, vì bên e cho người ta nhập hạn chế (nhập xuất gần tương đương nhau) nên ko sợ tràn dòng đâu ạ
cám ơn anh!!

 

[concogia]

dạ dữ liệu tồn kho xuất ra 1 cột thôi ạ ( theo đúng như file e làm ý ạ)
còn vấn đề a nghĩ giúp e về không đủ dòng thì a không phải lo, vì bên e cho người ta nhập hạn chế (nhập xuất gần tương đương nhau) nên ko sợ tràn dòng đâu ạ
cám ơn anh!!

Hihi, nếu muốn vậy thì mình làm cho bạn thôi
Thân

 

[hathuy271]

các bạn ơi. mình moi lên chưa post bài lên được. mình muốn nhờ các bạn xem giúp file XNT. có bạn nào giúp mình được xin để lại nich để tiện mình hỏi. cảm ơn các bạn. mong các bạn giúp mình nha