Excel VBA运行时错误'32809' - 试图理解它

Question

一位正在工作的同事对我们的一个宏工作簿进行了一些更改,现在在我的PC上,当我尝试运行它时,我只收到了可怕的运行时错误'32809'.这个最新版本在他的PC和我们测试它的另一个同事的PC上运行良好.以前的版本在我们所有的PC上运行良好,所有这些都运行Excel 2010.

当宏尝试选择名为"Info"的工作表索引1时,将引发错误.我知道选择/激活不是必需的,但我现在正在使用此工作簿,并试图解决为什么我一个人会收到此错误.

我试过了:

1. 重启/重启
2. 保存工作簿的副本
3. 使用CCleaner清除临时文件
4. 在线研究
5. 检查ActiveX控件(使用表单控件)

一切都没有成功.然后我在即时窗口看到了一些混乱,发现即使是一个简单的:

Debug.Print ThisWorkbook.Worksheets(1).Name

会抛出运行时错误,这让我相信Workheet已经破坏了.我在工作表中添加了几个事件,包括_Activate和_Change,但是在确认之后,没有任何事件会触发:

Application.EnableEvents = True

我添加了一个简单的Test Sub如下:

Public Sub Test()

    Dim ws As Worksheet
    Dim sheetNum As Integer

    For Each ws In ThisWorkbook.Worksheets
        ws.Select           ' Selects all Sheets Without Error
        Debug.Print ws.Name ' Prints All Worksheet Names Fine
    Next ws

    Set ws = ThisWorkbook.Worksheets(1)
    ws.Select               ' Selects Sheet 1 Without Error

    ' Prints all but sheetNum = 1, Run-time Error 32809
    For sheetNum = 7 To 1 Step -1
        Debug.Print ThisWorkbook.Worksheets(sheetNum).Name
    Next sheetNum

    ' Run-time Error 32809
    ThisWorkbook.Worksheets(1).Select

End Sub

有没有人碰到类似的东西或知道是什么原因导致这个错误只发生在某些PC上？

Answer 1

在我的情况下,以下帮助:

1. 将文件另存为.xlsx(无宏) - 保存时将删除所有宏;
2. 带有宏的开源文件并将模块复制到.xlsx文件中;
3. 将文件另存为.xlsm- 执行完全重新编译.

一切都开始正常了.我有200多页和50多个宏的文件,并在每个模块中发表评论没有帮助,但这个解决方案有效.

Answer 2

我也为此苦了一段时间。实际上是由于从12月开始通过Windows Update进行了一些Microsoft Office更新导致的。它引起了很多麻烦，更不用说由于此问题而导致的数小时的生产力损失。

其中一项更新破坏了表格，并且您需要按照UHsoccer的说明清除Office缓存

此外，这里还有另一个答案线程： 突然出现了多个VBA宏错误，主要是32809， 它具有指向MS博客的链接，其中包含详细信息。

另一个更新会导致另一个错误，如果您创建或修改其中一个表单（甚至与保存表单数据一样简单），则会更新电子表格的内部信息，如果将该电子表格提供给未经更新的其他人，则会导致该错误。上面的错误。

解决方案（如果您正在与其他人一起使用同一电子表格）？可悲的是，要么让您处理的每个人都使用Office更新，然后让他们清除Office缓存，要么通过系统还原（或通过手动删除它们）还原到14年12月之前的更新。

我知道，解决方案不多，对吧？我也不开心

只是作为背景，我更新了机器，以跟上更新的步伐，而与我打交道的公司之一没有这样做。圣诞节前，我正拔头发试图找出问题所在，没有任何恢复点，我终于松了口气，重新格式化了。

现在，一个月后，该公司的IT部门更新了其工作站。而且，毫不奇怪，他们也开始遇到与此类似的问题（更不用说当我收到他们的电子表格时，我也遇到了同样的问题）。

现在，我们所有人都在进行相同的更新，一切都很好。

Answer 3

我遇到过类似的（几乎无法解释的）行为

在目录 C:\Users\用户名\AppData\Local\Temp 下找到删除 .exd 文件的参考 在 Excel8.0 和 VBE 目录中各有一个。典型名称是 MSForms.exd

Google“Excel exd”或“KB 2553154”从我的角度来看，这是一种完全不可接受的情况，并且已经存在至少一个月了。