关闭工作簿上的CountA无法正常工作

时间:2016-02-09 16:03:58

标签: excel excel-vba vba

我正在使用Counta函数来检索已关闭工作簿中表格中的列数。该表是从同一工作簿中的另一个表创建的,并且在其中包含超链接。即使有4列/标题,该函数返回零。我需要这个号码来重新排列一个数组,但我得到了“运行时错误”#9;#39;。当我打开工作簿并删除表右侧的所有列和表格底部的所有行,保存并关闭然后再次尝试时,它可以正常工作。有没有人经历过这个?谢谢你的帮助!

这是公式:

=COUNTA('" & FilePath & "[" & fileName & "]" & sheetName & "'!1:1)

2 个答案:

答案 0 :(得分:0)

我认为你的公式看起来正确。您可能需要使用以下代码来更新外部链接。

ActiveWorkbook.UpdateLink Name:=ActiveWorkbook.LinkSources

答案 1 :(得分:0)

以下代码有助于解决我的问题。显然,它与表格和计算设置有关。感谢大家的投入!

wbCalcState = Application.Calculation
Application.Calculation = xlCalculationSemiautomatic

'code here

If wbCalcState <> 0 Then
    Application.Calculation = wbCalcState
Else
    Application.Calculation = xlCalculationAutomatic
End If