Sort: Run-time error '1004'

I get the following error when executing my macro:

Run-time error '1004':
Sort reference is not valid. Make sure that its within the data you want to sort, and the first sort box inst the same or blank

The code fragment:

Please Login or Register  to view this content.

The first ".Apply" line gets selected during debugging.

Any ideas on whats wrong?

Thanks in advance

Perhaps

Please Login or Register  to view this content.