Hi Steve,

Thanks for your reply. The code doesn't work. I typed in
MyXLfile.WorkSheets("Series Formatted
Data").Selection.End(xlDown).Select

But it does not work. Do you have any other suggestion?

Best wishes
Ferri

*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!