Anh dùng công thức này xem:Tôi có ý định đặt Mã cho vật tư, yêu cầu Mã Vật Tư thuộc nhóm nào thì Mã được đặt liên tục theo nhóm đó. Khi có phát sinh mã mới thì gặp vướng mắc, rất mong các anh, em trên GPE xem và giúp.
Cám ơn
( Đính kèm File)
=IF($A2="","",$A2&"-"&COUNTIF($A$2:$A2,$A2))
---Anh dùng công thức này xem:
PHP:=IF($A2="","",$A2&"-"&COUNTIF($A$2:$A2,$A2))
Đương nhiên nếu anh sort thì số thứ tự phía sau sẽ thay đổi thôi ---> Việc đánh số TT được ưu tiên từ trên xuống dưới mà!---
Hình như công thức này bị ảnh hưởng bởi lệnh Sort phải không chú?
---Đương nhiên nếu anh sort thì số thứ tự phía sau sẽ thay đổi thôi ---> Việc đánh số TT được ưu tiên từ trên xuống dưới mà!
Hay anh còn muốn gì khác hơn chăng?
Hay là thế này:---
Anh dùng mã vật tư để tính Nhập Xuất Tồn Kho, Mã Vật Tư không thay đổi được chú ơi (anh đang vận dụng vào Form Hổ Trợ Nhập Liệu của chú, Form này chú biết rõ, có lệnh Sort ).
---Hay là thế này:
- Anh dùng công thức trên để tạo mã
- Sau khi tạo xong, anh copy và PasteSpecial\Value vào chính nó
Vậy là.. hết chạy!
Code thế là ổn rồi---
Anh làm như thế này, mong chú xem giúp, đóng góp và sửa đổi (code trong sheet).
Mong tin.
Đính kèm file.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count > 1 Then Exit Sub
If Not Intersect(Target, Range("A2:A65536")) Is Nothing Then
With Target.Offset(, 2)
.FormulaR1C1 = "=IF(RC[-2]="""","""",RC1&""-""&TEXT(COUNTIF(R2C1:RC1,RC1),""00""))"
.Value = .Value
End With
End If
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count > 1 Then Exit Sub
If Not Intersect(Target, Range("A2:A65536")) Is Nothing Then
With Target.Offset(, 2)
.FormulaR1C1 = "=IF(RC[-2]="""","""",RC1&""-""&TEXT(COUNTIF(R2C1:RC1,RC1),""000""))"
.Value = .Value
End With
End If
End Sub
Tôi nghĩ bài bài này của bạn cũng sẽ bị xoá vì bạn post chen ngang.em có cái file này bị lỗi mà không biết tại sao, em hơi kém excel mà. em có gửi bài lên diễn đàn nhưng không hiểu sao gửi buổi sáng thì trưa đã bị xóa mất rồi. em có gửi file lên đây và trong file em đã ghi câu hỏi rồi đó, anh tìm em lỗi sai nha, nếu có thời gian rảnh anh chỉ em cách làm luôn nha. cảm ơn anh nhiều lắm.