Save as a csv. This will work for a given worksheet, but not for multiple worksheets.
If you need to do this from VB, search google for "Office Automation"
"Lisa, in this house, we obey the laws of thermodynamics!" - Homer Simpson
"I have my standards. They may be low, but I have them!" - Bette Middler
"It's a book about a Spanish guy named Manual. You should read it." - Dilbert