Question

我有一个包含大约1000行的excel文件。每行都有一个图像，类似于其中一列中的缩略图大小。图像重叠的单元格具有注释，该注释实际上包含相同图像的更大版本。

每次打开文件时我都会

Excel发现了不可读的内容。是否要恢复文件的内容？如果我说不，它会关闭。

如果我说是，则使用以下日志修复并删除部分零件： -

删除部分：/xl/drawings/vmlDrawing1.vml部分。（图形）删除部分：/xl/drawings/vmlDrawing2.vml部分。（绘图形状）

然后发生的是评论（包含更大版本的图片）在每一行都消失了。

该文件最初包含一个运行的宏，一旦完成，我将文件保存为xlsx，它将宏去掉了。

这种行为没有具体的模式，它不像我第一次在保存为xlsx或其他任何东西后重新打开它时发生的。这可能会好一段时间然后突然发生。

这种情况发生在Windows 7，Office 2010上

任何建议都将不胜感激

Answer 1

我遇到了同样的问题，并且能够修复它。问题是由于缓存在内存中。这是为我解决问题的代码。

Public Sub PT_cache_clear() Dim pc As PivotCache Dim ws As Worksheet With ActiveWorkbook For Each pc In .PivotCaches pc.MissingItemsLimit = xlMissingItemsNone Next pc End With End Sub

Answer 2

我有同样的问题。给我的XML消息是：

<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<recoveryLog xmlns="http://schemas.openxmlformats.org/spreadsheetml/2006/main"><logFileName>error076520_01.xml</logFileName><summary>Errors were detected in file 'C:\Work\New Work\SOP New Tool.xlsm'</summary><removedRecords summary="Following is a list of removed records:"><removedRecord>Removed Records: Sorting from /xl/worksheets/sheet5.xml part</removedRecord></removedRecords></recoveryLog>

现在我可以在检查代码后将其修复。

在该excel的sheet5的排序函数中，我先前编写如下：

L = Worksheets("Early Response to Check").UsedRange.Rows.Count
With Worksheets("Early Response to Check").Sort
    .SortFields.Add Key:=Range("P1"), Order:=xlAscending
    .SortFields.Add Key:=Range("AX1"), Order:=xlAscending
    .SetRange Range("A1:AZ" & L)
    .Header = xlNo
    .Apply
End With

这是无法阅读的部分，并将其视为不可读的内容。

我需要将其更改为以下内容：

L = Worksheets("Early Response to Check").UsedRange.Rows.Count
With Worksheets("Early Response to Check").Sort
    .SortFields.Add Key1:=Range("P1"), Order1:=xlAscending
    .SortFields.Add Key2:=Range("AX1"), Order2:=xlAscending
    .SetRange Range("A1:AZ" & L)
    .Header = xlNo
    .Apply
End With

然后瞧，错误消失了。

希望这也可以帮助其他人纠正这种错误。

谢谢，弥勒佛

Excel在<filename> </filename>中找到了不可读的内容

2 个答案: