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

我有一个VBAmacros打开Excel和读取数据。

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

第三行发生错误“太多不同的单元格格式”。 我认为这是因为单元格格式(字体,边框等),并没有人知道如何通过编程解决这个问题? 当我尝试手动打开Excel时没有提出错误。 任何意见,将不胜感激。

而不是你的代码,尝试这样做:

 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. 

只要记住在之后将它们设置回它们的默认值。