Bạn tham khảo file đính kèm xem co được chưa. Hy vọng đúng ý của bạn.
1. Bạn mở code ra va chèn đoạn in đậm bên dưới sẽ reset cột STT: 1,2,3,4,5...
2. Mình suy nghĩ hoài vẫn chưa hiểu tồn đầu kỳ của bạn là những điều kiện nào
3. Về yêu cầu không cần bấm nút delete thì mình chưa có cách, mong các cao thủ giúp dùm
If Trim(Sheets("TONGHOP").Range("AE" & dong).Value) = _
Trim(Target.Value) Then
Range("A" & dong1 & ":AM" & dong1).Value = _
Sheets("TONGHOP").Range("A" & dong & ":AM" & dong).Value
Range("A" & dong1).Value = dong1 - 3
dong1 = dong1 + 1
End If
Có phải tồn đầu kỳ của bạn bao gồm tất cả các tháng tồn tại trong sheet tong hop? Nếu đúng như thế thì phải chờ các cao thủ ra tay thôi. Mình bí rồi