VBA hide last two rows in a table

[tbrynard01]

I would like to do a macro that will hide the last row and the total row in a table in excel. Any advice?
Thank you!

 

[DanteAmor]

Try this

Sub Macro1()
  Range("A" & Rows.Count).End(xlUp)(0).Resize(2).EntireRow.Hidden = True
End Sub

 

[JoeMo]

Try this - change the table name to match the name of your table:

Sub HideLastAndTotalRows()
Dim LO As ListObject
Set LO = ActiveSheet.ListObjects("Table1")  ' change table name to suit
With LO
    .DataBodyRange.Rows(LO.DataBodyRange.Rows.Count).Resize(2).Hidden = True
End With
End Sub

 

[tbrynard01]

You're a genius thank you!

 

[JoeMo]

You're a genius thank you!

You are welcome - thanks for the reply.