theo mình hiểu chỗ ".Rows("6:6").Resize(Hg).Insert Shift:=xlDown" là địa chỉ cố định để thêm dòng vào, nhưng nếu vị trí của Table bị thay đổi do vô tình ( vd ban đầu là vị trí A6:E10, nhưng bị thay đổi do vô ý thành B10:F16 ) thì có lẽ sẽ bị lỗi vì vị trí thêm dòng không đúng?
Có thể điều chỉnh...