Ok, I figured out my problem, now the code runs about 1000 times faster,
believe it or not. I changed the code to use a textstream object, and still
had performance issues. Then I changed the the 'format' property of the
textstream from ASCII to Unicode (I have Unicode characters in the sheet).
Performance went from about 20 minutes to copy a sheet to less than 1 second!