Giải thích giúp mình đoạn mã sau với (1 người xem)

[Zungnext]

Giải thích giúp mình mã ListObject.ListRows.Add AlwaysInsert

ActiveSheet.Unprotect
Range("A4").Select
Selection.End(xlDown).Select
Selection.ListObject.ListRows.Add AlwaysInsert:=True
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True _
, AllowFormattingColumns:=True, AllowFiltering:=True, _
AllowUsingPivotTables:=True
End Sub

Mình mới biết về marco đang định tạo marco để thêm dòng bên dưới. Mình xem thấy trong file của 1 bạn có đoạn mã trên. Chỉ có đoạn " Selection.ListObject.ListRows.Add AlwaysInsert:=True " mình không biết thao tác như nào để có được đoạn mã này. Ai biết chỉ giúp mình nhé.
Cảm ơn các bạn nhiều.

 

[Quang_Hải]

ActiveSheet.Unprotect
Range("A4").Select
Selection.End(xlDown).Select
Selection.ListObject.ListRows.Add AlwaysInsert:=True
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True _
, AllowFormattingColumns:=True, AllowFiltering:=True, _
AllowUsingPivotTables:=True
End Sub

Mình mới biết về marco đang định tạo marco để thêm dòng bên dưới. Mình xem thấy trong file của 1 bạn có đoạn mã trên. Chỉ có đoạn " Selection.ListObject.ListRows.Add AlwaysInsert:=True " mình không biết thao tác như nào để có được đoạn mã này. Ai biết chỉ giúp mình nhé.
Cảm ơn các bạn nhiều.

Câu lệnh sai rồi làm sao chạy được
1. Ít nhất bạn phải có 1 Table trong bảng tính
2. Nếu có Table rồi thì mới chạy dòng code chèn thêm dòng cho table
3. Nếu không biết thì thử Record macro sẽ biết cách tạo ra dòng lệnh đó

 

[Zungnext]

Câu lệnh sai rồi làm sao chạy được
1. Ít nhất bạn phải có 1 Table trong bảng tính
2. Nếu có Table rồi thì mới chạy dòng code chèn thêm dòng cho table
3. Nếu không biết thì thử Record macro sẽ biết cách tạo ra dòng lệnh đó

Cảm ơn bạn mình làm được rồi