Question

每当我在电子表格中包含以下公式时，都会在打开文档时创建错误。消息说“我们发现'documentname.xlsm'中的某些内容存在问题。您是否希望我们尽可能多地恢复？”选择“是”后，工作表显示另一条消息“Excel可以通过修复不可读的内容来打开文件”。文件中的任何内容似乎都没有改变。但是，如果我离开公式，它就会毫无问题地打开。

= OR（TEXT（D11， “MMM-YYYY”）= TEXT（$ C $ 4中， “MMM-YYYY”），TEXT（E11， “MMM-YYYY”）= TEXT（$ C $ 4“，mmm- YYYY“）和（D11＆GT; $ C $ 4中，D11

Answer 1

我能够通过在关闭文档之前添加代码来清除所有过滤器和排序来防止错误。

Private Sub WorkBook_BeforeClose（取消为布尔值） Dim ws As Worksheet Dim wb As Workbook Dim listObj As ListObject

ActiveSheet.Unprotect "pob2017edit"
For Each ws In ActiveWorkbook.Worksheets
    For Each listObj In ws.ListObjects
        If listObj.ShowHeaders Then
            listObj.AutoFilter.ShowAllData
            listObj.Sort.SortFields.Clear
        End If
    Next listObj
Next ws

Excel删除不可读的内容

1 个答案: