Bạn kiểm tra chưa mà đưa lên vậy, A1 là tiêu đề thì dùng vầy mới đúng.=if (A1=A2-1;"";"thieu")
.
Function SoThieu(Rng As Range) As String
Dim X As Long, SoToiDa As Long
SoToiDa = WorksheetFunction.Max(Rng)
ReDim Nums(1 To SoToiDa)
For X = 1 To SoToiDa
If Rng.Find(X, LookAt:=xlWhole) Is Nothing Then
SoThieu = SoThieu & ", " & X
End If
Next
SoThieu = Mid(SoThieu, 3)
End Function
Theo dõi công văn thì bạn tham khảo File bài 130 của Link sau, nếu không đúng ý thì nên mở Topic mới với tiêu đề "Tự động gán số công văn theo từng loại" (liệt kê các loại ra), chứ không nên chen ngang bài viết không cùng chủ đề là vi phạm nội quy.Mình có 01 file cấp số VB gồm 03 đuôi VB...mình có sử dụng hàm Vlookup để lựa số trong dải cho sẵn nhưng bị hiện tượng trùng số...bạn có giải pháp nào khác để khắc phục được k?? người lấy số chỉ cần đưa ngày lấy số (cột B) và chọn đuôi VB (cột F) thì ra kết quả cột G...và kết quả số thứ tự không bị trùng. Bạn có thể viết hàm được không ?? mình xin hậu tạ! Tks!