Vba 如何在保存后保持工作簿的格式而不影响布局(表格、颜色、样式)

Vba 如何在保存后保持工作簿的格式而不影响布局(表格、颜色、样式),vba,excel,Vba,Excel,当通过VBA在工作簿中完成某些操作,并通过VBA保存时,当我试图打开保存的文件时,表格、颜色和图表没有出现。 我已经为一些工作簿中的数据创建了一个图表,它正在工作。 但如果我保存或另存为包含图表的工作簿,当我再次尝试打开时,没有图表和表格以及应用于某些行的颜色没有显示,只有普通数据显示 源工作簿为.csv格式。 我将它保存为.xlsx和.csv ActiveWorkbook.SaveAs“C:\Documents and Settings\Desktop\finaloutput11.csv” A

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

源工作簿为.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

也尝试了“仅保存”选项


请告诉我如何保存该格式。

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

看到这张桌子了吗

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

开始检查@mehow的参数:这次你打败了我;)嗨,如果我粘贴上面的代码,运行时错误-1004,应用程序定义或对象定义错误。也曾为“56”而受审。我已将此代码替换为旧代码。我已将此代码替换为旧代码,我使用的是excel 2007版本。路径正确吗?因为它对我有效,它唯一给我错误的时候就是你给了一个错误的路径。