Excel VBA代码导致我的工作表显示为行话

时间:2014-04-30 18:47:21

标签: excel vba excel-vba

我目前正在使用我在堆栈上发现的VBA宏。问题是,当我运行它时,它将所有数据保存到一个单独的Excel工作表中,但当我打开它时,它显示为“行话”,换句话说是不可读的类型。这是“保存代码”

'Save the new workbook, and close it
wb.SaveAs ThisWorkbook.Path & "\test" & WorkbookCounter
wb.Close

我目前正在运行代码的方式是它将我的Excel工作表分成250行的不同电子表格。一切正常但是当我打开保存的文档时,它表示这种文件格式对Excel来说是不可接受的。然后我尝试导入它,我收到一个错误。这是它在我的屏幕中出现的方式的快照。这里还有文件名:built.list \ test.xls39

1 个答案:

答案 0 :(得分:2)

您的工作簿计数器始终以数字结尾,Windows和Excel使用文件扩展名来确定文件类型,因此“.xls39”文件无法识别。尝试:

    wb.SaveAs _
    Filename:=ThisWorkbook.Path & "\test" & WorkbookCounter & ".xls" _
    FileFormat:=XlFileFormat.xlExcel8

'Use xlOpenXMLWorkbook for the .xlsx format

(使用空格后跟下划线分隔VBA中的行)

或确保WorkbookCounter以.xls结尾,而不是数字。

(编辑:对于其他格式,请查看Excel VBA编辑器中的“参考”对话框)