VBA无法打开excel（太多不同的单元格格式。）

Question

我有一个vba宏来打开excel并读取数据。

Dim xlApp As Excel.Application
Set xlApp = CreateObject("Excel.Application")
Set excelworkbook = xlApp.Workbooks.Open(file_path, ReadOnly:=True, notify:=False)

错误“太多不同的单元格格式”出现在第三行。我认为这是因为单元格格式（字体，边框等），有没有人知道如何以编程方式解决此问题？当我尝试手动打开Excel时，不会引发错误。任何意见，将不胜感激。

Answer 1

代替您的代码，尝试这样做：

Dim excelWorkbook As Excel.Workbook
Set excelWorkbook = Excel.Workbooks.Open(file_path, ReadOnly:=True, Notify:=False)

如果它仍然给你带来麻烦，也许添加这些将有所帮助：

Application.DisplayAlerts = False
' Application.ScreenUpdating = False ' Optional, might not be necessary.

请记住之后将它们恢复为默认值。