Question

当通过VBA在工作簿中完成某些操作，并在通过VBA保存时，当我尝试打开保存的文件时，表，Clolors和Charts不会出现。
我已经为某些工作簿中的数据创建了一个图表，它正在运行但是如果我保存或保存具有Chart的工作簿，当我再次尝试打开时，没有显示应用于某些行的图表和表格以及颜色，只显示普通数据。

源工作簿采用.csv格式。我将其保存为.xlsx和.csv。

ActiveWorkbook.SaveAs "C:\Documents and Settings\Desktop\finaloutput11.csv"
ActiveWorkbook.Close SaveChanges:=True

或
ActiveWorkbook.SaveAs "C:\Documents and Settings\Desktop\finaloutput12.xlsx"
ActiveWorkbook.Close SaveChanges:=True
尝试过只有保存选项。

请告诉我们如何保留格式。

Answer 1

保存文件时必须使用相关的文件格式。

参见此表

51 = xlOpenXMLWorkbook (without macro's in 2007-2013, xlsx)
52 = xlOpenXMLWorkbookMacroEnabled (with or without macro's in 2007-2013, xlsm)
50 = xlExcel12 (Excel Binary Workbook in 2007-2013 with or without macro's, xlsb)
56 = xlExcel8 (97-2003 format in Excel 2007-2013, xls)

所以你的代码将被写为

ActiveWorkbook.SaveAs _
"C:\Documents and Settings\Desktop\finaloutput12.xlsx", fileformat:=51

对于csv，文件格式为6，请尝试使用

ActiveWorkbook.SaveAs _
"C:\Documents and Settings\Desktop\finaloutput11.csv", fileformat:=6

如何在保存后保留工作簿的格式而不影响布局（表格，颜色，样式）

1 个答案: