2014-07-14 91 views
1

我有一个vba宏来打开excels和读取数据。VBA无法打开excel(太多不同的单元格格式)。

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

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

回答

0

,而不是你的代码,尝试做这种方式:

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

如果它仍然给你带来麻烦,也许添加这些将帮助:

​​

只要记得设置回自己之后默认。

+0

嗨,我已经将displayAlerts设置为false,仍然有相同的错误。有什么建议么? – bananaLeaf

+0

即使使用我发布的代码?嗯...尝试没有'ReadOnly'和'Notify'参数来查看它是否有任何区别。除此之外,我不害怕。我已经多次使用上面的代码为我自己的项目,没有任何问题,所以我不确定你的工作簿有什么不同。 – djikay

+1

@bananaLeaf:你可能已经看到了这个,但是,如果没有,[这个SO问题](http://stackoverflow.com/questions/2449755/too-many-different-cell-formats)似乎是相关的并且有一个数字潜在的解决方案尝试。 – djikay

相关问题