各位大哥帮帮忙，怎么样把一段格式化的文本导入到Execel表格中！！

Question

http://www.csdn.net/expert/topic/544/544295.xml?temp=.6229212

Answer 1

直接打开就可以了，之后再copy&paste, 参考下面的vb代码   'Create a new instance of Excel
   Dim oExcel As Object
   Dim oBook As Object
   Dim oSheet As Object
   Set oExcel = CreateObject("Excel.Application")
       
   'Open the text file
   Set oBook = oExcel.Workbooks.Open("C:\Test.txt")
   
   'Save as Excel workbook and Quit Excel
   oBook.SaveAs "C:\Book1.xls", xlWorkbookNormal
   oExcel.Quit