Problems selecting correct data after filter is in place

I have an issue where as after a filter is in place the number of rows could vary between 1 and about 50. The code I wrote below was to try to get around the problem of selecting the entire worksheet when the filter only returns one row but doesn't work. Can anyone help me find out where I have gone wrong?

Please Login or Register  to view this content.

Thanks so much for your help. That worked brilliantly