VBA to delete HeaderRowRange

[Ann Ooi]

Hi, I just need to delete the header of a table and copy the body range to another worksheet. But not sure what is not right with the code below, it just not able to delete the header.
Following is my code.

Dim lo As ListObject

 Workbooks("WIP_Macro.xlsm").Sheets("WIP").Activate
    
 Set lo = Worksheets("WIP").ListObjects("WIPFlow")
 lo.HeaderRowRange.Delete
  lo.DataBodyRange.SpecialCells(xlCellTypeVisible).Select
 Selection.Copy

 

[JoeMo]

You can copy the DataBodyRange without deleting the header row. Why do you want to delete the header row?

 

[Ann Ooi]

You can copy the DataBodyRange without deleting the header row. Why do you want to delete the header row?

ok, got it. As I don't need the table header, and just need to paste the body range to another worksheet, which already has header and data accumulated. So, the header is not allowed to delete right?

 

[JoeMo]

ok, got it. As I don't need the table header, and just need to paste the body range to another worksheet, which already has header and data accumulated. So, the header is not allowed to delete right?

Correct, ListObjects must have a header. If you really need to delete it you can convert the table to a range and then delete the header.