Excel 2013删除部分：/xl/drawings/vmlDrawing1.vml
之后我在Excel 2013中做这件事
strSaveName = ThisWork.Path & "\" & strExt & ".xlsx" .SaveAs strSaveName, FileFormat:=51 Excel在打开此xlsx文件时出现以下错误：“Excel在'newFile.xlsx'中发现不可读的内容。是否要恢复此工作簿的内容？如果您信任此工作簿的源，请单击”是“。
一旦我点击是，我会收到以下通知：“Excel能够通过修复或删除不可读的内容来打开文件。删除零件：/xl/drawings/vmlDrawing1.vml零件。（绘graphics状）”
也是所有的coments被删除。
如果我保存在另一种格式
strSaveName = ThisWork.Path & "\" & strExt & ".xls" .SaveAs strSaveName, FileFormat:=56
在excel 2003中，不断的改变，而是警告不支持的公式
如何解决这个问题，并保存文件为xlsx？
尝试在原始文件上运行此代码
Dim objcomment As Comment For Each objcomment In ActiveSheet.Comments With objcomment.shape .top = objcomment.Parent.top .Visible = False End With Next