Dùng VBA để đánh số phiếu tự động thay vì áp dụng công thức

  • Thread starter SA_DQ
  • Ngày gửi
S

SA_DQ

Thành viên Cố vấn - Webketoan Mentors
29/6/05
583
103
43
67
HCM city
Em có ý tưởng muốn tạo số phiếu tự động với điều kiện cần thiết, nếu năm đánh số phiếu khác năm trước thì sẽ đánh lại số phiếu từ đầu
E có sử dụng công thức excel, nhưng làm với số lượng dòng trên vạn dòng thì chạy rất lâu và có khi bị đứng máy
Em có viết code bằng vba nhưng do trình độ còn non, code cũng không được nhanh hơn là mấy
Em gửi file lên mong anh chị xem qua và chỉ cách cho em với ạ!

Số phiếu mình đề nghị có khác với bạn 1 chút; Chúng gồm luôn là 10 kí tự (hay ký số),đó là
AJLA16N002
AJLA16N002
AJLA16X001
AJLACUX246
AJLACVG001
AJLACVG001
. . . .
Giải thích:
3 ký tự đầu là quy ước của CQ bạn;
3 ký tự tiếp theo là mã hóa Năm-Tháng-Ngày: 'A' là năm 2020; năm 2021 sẽ là 'B'
Ký tự tiếp theo chỉ số tháng: '9' là tháng 9; 'A' sẽ là tháng 10;
Tiếp sẽ là ký tự chỉ ngày: 'Ngày 11 là 'B', . . . .
Ký tự thứ 4 trước cuối chỉ ra hướng của phiếu: 'N' là nhập'; 'X' là xuất & 'G' là khác
3 ký số cuối là số phiếu tăng dần trong năm; Năm sau lại bắt đầu theo yêu cầu của bạn
[Ở đây số phiếu theo 'N' , 'X' hay 'G' tăng theo riêng rẽ]

Các bạn tham khảo theo file
 

Đính kèm

  • VatTu.rar
    144.5 KB · Lượt xem: 5
Khóa học Quản trị dòng tiền

Xem nhiều

Webketoan Zalo OA