急！急求解决：spreedsheet中单元格数据的自动换行问题

如题：
我在VB中加载excel的方式：先把excel保存为xml文件，再在VB中用spreedsheet空间加载xml文件，如：spreedsheet.XMLURL = "d:\sss.xml"。
问题：spreedsheet中单元格中的数据不能自动换行，试了几种方法均无效，急求解决方法，请各位大侠指点！
实验的方法：1）在加载的excel中预先设置好自动换行属性，但加载后无效；
2）VBA中可以通过以下代码实现：sheet.cells(1,1).wraptext=true; 但在VB中编译通过，但还是无效，不能实现自动换行。