Đánh số phiếu nhập xuất tự động theo tháng

Liên hệ QC

thinhnx22

Thành viên hoạt động
Tham gia
22/12/15
Bài viết
182
Được thích
38
Gửi anh chị và các bạn,
Em đang cần công thức để đánh số thứ tự phiếu nhập xuất tự động theo tháng. Trong file đính kèm, em đã mô tả yêu cầu cần làm. Mong nhận được sự trợ giúp của mọi người. Chân Thành cảm ơn.
 

File đính kèm

  • danhphieunhapxuat.xlsx
    8.8 KB · Đọc: 53
Bài này rất rối :D nếu cái 152 có thể là bất kỳ số nào khác thì ^^
Không sao đâu em! trong kế toán: Tài khoản số hiệu 15 nằm bên cột Nợ là Nhập, bên Có là Xuất nên không có gì rối cả! Đánh số thứ tự này dành cho theo dõi Nhập Xuất TK.15 thì được thôi!
hihi ^o^
 
Upvote 0
Không sao đâu em! trong kế toán: Tài khoản số hiệu 15 nằm bên cột Nợ là Nhập, bên Có là Xuất nên không có gì rối cả! Đánh số thứ tự này dành cho theo dõi Nhập Xuất TK.15 thì được thôi!
hihi ^o^
Công thức rất hay, cảm ơn bạn. Mình sẽ tìm hiểu thêm về công thức.
 
Upvote 0
Trong thực tế có khi nào số hóa đơn của nhập và xuất giống nhau không? :p
Theo dõi TK.15x thì chỉ sợ Hóa đơn Nhập hàng có thể trùng số, còn Xuất là số Cty quy định chuẩn lúc phát hành, có thể gắn thêm ký tự nào đó, nên khó có thể trùng lắp.
Cho dù có trùng số giữa Hóa đơn Nhập-Xuất, thì công thức trên có thể phân biệt được, nên cũng không sao.
Đáng ngại là giữa Hóa đơn Nhập mà thôi, lúc đó muốn chính xác phải thêm 1 tiêu chí so nữa (Vd: Nhà Cung cấp chẳng hạn...) vào công thức trên là ổn.
hihi ^o^
 
Upvote 0
Gửi anh chị và các bạn,
Em đang cần công thức để đánh số thứ tự phiếu nhập xuất tự động theo tháng. Trong file đính kèm, em đã mô tả yêu cầu cần làm. Mong nhận được sự trợ giúp của mọi người. Chân Thành cảm ơn.
Cho bạn thêm cách tạo phiếu tăng giảm theo ngày hóa đơn, cột ngày hóa đơn không cần sắp theo thứ tự:
Yêu cầu bấm Ctrl+Shift+Enter cho công thức!!!
 

File đính kèm

  • danhphieunhapxuat.xlsx
    9.7 KB · Đọc: 95
Upvote 0
Code hay công thức đều được.
Trong thực tế có khi nào số hóa đơn của nhập và xuất giống nhau không?
Các bài trên cũng đã có công thức rồi, tôi gởi bài có code cho bạn
Các điều kiện để chạy code như sau
Nếu những hóa đơn mà có cùng ngày tháng, và Nợ hay Có các tài khoản 1521, 1522, 155 (bạn có thể thêm trong code VD : 156 ...) thì code sẽ đánh số PN, hay PX
Lưu ý: nếu tài khoản Nợ/Có không có như nói trên thì không đánh số phiếu!
Điều kiện thêm, bạn phải chuyển cột Nợ /Có về Number
Cách làm Chọn E4:D11, bên góc trái của cell E4 xuất hiện hình vuông, trong hình vuông có dấu !, bạn click vào và chọn " Convert to number
Như các anh/chị đã nói ở trên, giả sử ngày 01/01/2018 có 2 khách hàng bán NVL cho cty bạn và cùng xuất hóa đơn số 1 thì sao, đúng ra bạn phải thêm 1 cột Mã khách hàng nữa ...
 

File đính kèm

  • danhphieunhapxuat-c.xlsm
    18.8 KB · Đọc: 65
Upvote 0
Đúng là phải có tình huống như các anh chị ở trên phân tích. Cảm ơn bạn và tất cả các anh chị đã giúp đỡ. Chúc mọi người một ngày vui.
 
Upvote 0
Cho bạn thêm cách tạo phiếu tăng giảm theo ngày hóa đơn, cột ngày hóa đơn không cần sắp theo thứ tự:
Yêu cầu bấm Ctrl+Shift+Enter cho công thức!!!
Công thức của bạn rất hay, bạn có thể giải thích rõ công thức giúp mình được k? Đoạn giá trị của hàm N ấy:
B4+MATCH(C4;$C$4:$C$16;1)/10^6>IF((LEFT(D4;3)="152")-{0\1};IF((MATCH($C$4:$C$16;$C$4:$C$16;1)=ROW($A$4:$A$16)-3)*(TEXT($B$4:$B$16;"my")=TEXT(B4;"my"))*(LEFT($D$4:$E$16;3)="152");$B$4:$B$16+MATCH($C$4:$C$16;$C$4:$C$16;1)/10^6))
 
Upvote 0
Trong trường hợp ngày hóa đơn không được sắp xếp theo trình tự thì làm bằng VBA như thế nào. Các bạn giúp mình như mô tả trong file. Cảm ơn các bạn
 

File đính kèm

  • danhphieunhapxuat.xlsx
    10.1 KB · Đọc: 24
Upvote 0
Mình có cách để mã hóa & giải mã 1 số liệu ngày tháng năm thành chuỗi 3 kí tự như I9B
Trong đó I là kí tự chỉ năm 2019, năm sau sẽ là J;
Con số 9 là tháng 9, tháng 10 sẽ là A,. . .
B đại diện cho ngày 11,. . . .
Bạn cần có để tham khảo không?
 
Upvote 0
Dạ vâng, bác cho cháu xin với ạ. Cảm ơn bác nhiều.
 
Upvote 0
PHP:
Const Alf As String = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ"
Function MaVT(Dat As Date) As String

 MaVT = Mid(Alf, Year(Dat) - 2000, 1)
 MaVT = MaVT & Mid(Alf, 1 + Month(Dat), 1)
 MaVT = MaVT & Mid(Alf, 1 + Day(Dat), 1)
End Function
Mã:
Function IDToDate(StrC As String) As Date
 Dim Nm As Long, Th As Byte, VTr As Integer
  
 VTr = InStr(Alf, Left(StrC, 1))
 Nm = 2000 + VTr
 VTr = InStr(Alf, Mid(StrC, 2, 1))
 Th = VTr - 1
 VTr = InStr(Alf, Right(StrC, 1))
 IDToDate = DateSerial(Nm, Th, VTr - 1)
End Function
 
Upvote 0
Các bạn giúp mình theo file đính kèm bài 15. Cảm ơn các bạn nhiều
 
Upvote 0
Các bạn giúp mình theo file đính kèm bài 15. Cảm ơn các bạn nhiều
Cách đánh số phiếu của minh như sau:
NNFNAX
2 kí số đầu tăng theo thứ tự số phiều trong ngày của nhập hay xuất hàng
Sau đó là 3 kí tự /hay kí số để chỉ 1 ngày-tháng-năm lập phiếu cụ thể nào đó
Kí tự cuối chỉ gồm 'N' hay 'X', đại diện để chỉ quá trình vận hành HH trong kho theo chiều nào


(Số phiếu của bạn)Ngày chứng từSố hóa đơnNợGPE.COM
PN002/33/15/201805675152133100H3FN
PN001/33/10/201805677152233100H3AN
PX001/33/3/201805677621152100H33X
PN003/33/15/2018A11521111101H3FN
PN003/34/2/2018632152133100H42N
PN003/44/7/2018555ds152233100H47N
PX001/33/15/201805677621152200H3FX
PX001/44/9/2018900621152100H49X
PN004/33/15/2018633152233102H3FN
PN001/44/2/2018632152233101H42N
PN002/44/2/2018935152133102H42N
PX001/33/15/2018789621152201H3FX
PX001/44/7/2018789621152200H47X
GPE.COM
 

File đính kèm

  • Mã.rar
    16.2 KB · Đọc: 47
Lần chỉnh sửa cuối:
Upvote 0
Web KT
Back
Top Bottom