[VBA] Table selection - Header and dataBody Range and no total

[Radoslaw Poprawski]

Hello,

I visited sites like VBA Tables and ListObjects - Excel Off The Grid
and The VBA Guide To ListObject Excel Tables — TheSpreadsheetGuru

and I cant find what Im looking for,.

My problem:
How Do I select Header and data.body.Range simultaneously ?

I tried:

Range("PTTUC___DTO_Reversal[[#Headers],Data.Body.Range]").Select

but it does not work.

My table has Header, DataBodyRange and totals row.

I need to select all exept total row which needs to stay.

 

[RoryA]

It should be something like:

Range("PTTUC___DTO_Reversal[[#Headers],[#Data]]").Select

or if you have a reference to the listobject in a variable lo, something like:

Union(lo.headerrowrange, lo.databodyrange).select

 

[Radoslaw Poprawski]

Thank you.


It works.
Marking this as A solution.

One more Q.
In Power query we can check if Table is Empty

Table.IsEmpty(Table_Name)

But How to check this in VBA?

 

[RoryA]

You could use WorksheetFunction.Counta(lo.databodyrange) = 0

 

[Radoslaw Poprawski]

Thank you, but how that would work with Table names?
i have trouble understanding the "lo" part of the code.

 

[Radoslaw Poprawski]

Ok I managed to find a way using your suggestion.