数据导出为excel表的保存问题，在线等(急，解决了马上给分。。。)

Question

代码如下：Dim Excelapp As New excel.Application
Excelapp.Workbooks.AddDim i, j As Long
For i = 0 To MSHFlexGrid1.Rows - 1
    For j = 2 To MSHFlexGrid1.Cols - 1
        If j = 2 Then
            Excelapp.Cells(i + 1, j - 1) = Chr(13) & MSHFlexGrid1.TextMatrix(i, j)
        Else
            Excelapp.Cells(i + 1, j - 1) = MSHFlexGrid1.TextMatrix(i, j)
        End If
    Next
Next
Excelapp.Columns.AutoFitOn Error GoTo ert
    Excelapp.SaveWorkspace
ert:
    Excelapp.Quit
在Excelapp.SaveWorkspace保存后，除了要存的一个.xls文件，还多出一个RESUME.XLW文件？？？
如何不让RESUME.XLW文件出现？

Answer 1

将对工作表的修订（语法 1）或对工作簿的修订（语法 2）保存到另一个不同的文件。语法 1expression.SaveAs(Filename, FileFormat, Password, WriteResPassword, ReadOnlyRecommended, CreateBackup, AddToMru, TextCodePage, TextVisualLayout)语法 2expression.SaveAs(Filename, FileFormat, Password, WriteResPassword, ReadOnlyRecommended, CreateBackup, AccessMode, ConflictResolution, AddToMru, TextCodePage, TextVisualLayout)expression 必选。该表达式返回一个 Chart 对象或 Worksheet 对象（语法 1）或者一个 Workbook 对象（语法 2）。Filename  Variant 类型，可选。该字符串表示要保存的文件名。可包含完整路径。如果不指定路径，Microsoft Excel 将文件保存到当前文件夹中。FileFormat   可选 Variant 类型。保存文件时使用的文件格式。要得到有效选项的列表，请参阅 FileFormat 属性。对于已有文件，其默认格式是上次指定的文件格式；对于新文件，默认格式为当前使用的 Excel 版本格式。Password   Variant 类型，可选。它是一个区分大小写的字符串（最长不超过 15 个字符），用于指定文件的保护密码。WriteResPassword  Variant 类型，可选。该字符串表示文件的写保护密码。如果文件保存时带有密码，但打开文件时不输入密码，则该文件以只读模式打开。ReadOnlyRecommended   Variant 类型，可选。如果为 True 则在打开文件时显示一条信息，提示该文件以只读模式打开。CreateBackup  Variant 类型，可选。如果为 True 则创建备份文件。AccessMode   可选 Variant 类型。工作簿访问方式。可以是下列 XlSaveAsAccessMode 常量之一：xlShared（共享清单）、xlExclusive（独占方式）或 xlNoChange（不改变访问方式）。如果该参数被忽略，则访问方式不会改变。如果保存共享清单时不更改文件名，则本参数将被忽略。要更改访问方式，可使用 ExclusiveAccess 方法。ConflictResolution   Variant 类型，可选。指定当工作簿为共享清单时更改冲突的处理方式。可为下列 XlSaveConflictResolution 常量之一：xlUserResolution（显示冲突处理对话框）、xlLocalSessionChanges（自动接受本地用户的更改）或 xlOtherSessionChanges（接受其他用户的更改）。如果忽略本参数，则显示冲突处理对话框。AddToMru   Variant 类型，可选。如果为 True 则将该工作簿添加到最近使用文件的列表中。默认值为 False。TextCodePage   Variant 类型，可选。不在美国英语版的 Microsoft Excel 中使用。TextVisualLayout   Variant 类型，可选。不在美国英语版的 Microsoft Excel 中使用。

Answer 2

先谢谢，可是看不懂啊，我根本找不到.SaveAs方法。

Answer 3

EXCEL的辈份关系是Application>Workbook>Sheet>Cell
Excelapp.Cells(i + 1, j - 1)这个能运行是由于默认属性（默认二次了）
Workbook可以SaveAsExcelapp.ActiveWorkbook.SaveAs "c:\test.xls"