ListObject sort error 1004

[jeetkapadia]

I have 700 tables named RefTable1...RefTable700 that I'm trying to sort by the date column (column 3). This is the code I have, I am getting an error for the range not defined.
(Feel free to suggest an entirely different way of doing this if it's better) Thanks!

Please Login or Register  to view this content.

[kev_]

Your code works fine for me
- VBA is not finding one of the tables
- is there a table for every number?

after this line

Please Login or Register  to view this content.

insert this line

Please Login or Register  to view this content.

and VBA sorts every table if finds

[Andy Pope]

try

Please Login or Register  to view this content.

[jeetkapadia]

Hi kev_ and Andy,

Thanks for the answer! On Error Resume Next works but I just printed out all the table names and they are all there, from 1 to 700. Any idea why this would happen?

[kev_]

No but you could start by finding out when it falls over. It may help.

You need the Immediate Window Open in VBA
either View\Immediate Window or shortcut {CTRL} g

to allow it to fail again remove:

Please Login or Register  to view this content.

... immediately below:

Please Login or Register  to view this content.

...add this line:

Please Login or Register  to view this content.

DebugPrint will dump each value of "i" to the immediate window until the code fails.
The last value is the one you want.

[bakerman2]

Have you tried

Please Login or Register  to view this content.

[jeetkapadia]

Thanks kev! Got the problem. One of the tables was empty so it got stuck on the empty table.
Bakerman, when header is yes, does range/databodyrange matter?

[kev_]

Thanks for the reps and for marking thread as SOLVED