文本框值分配突然不起作用

Text Box Value Assignment Suddently Doesn't Work

我有一本将于 Excel 2010 年打开的工作簿。其中的 VBA 代码在过去五个月中一直 运行 顺利。突然之间,我遇到了奇怪的错误。

最令人沮丧的是当用户导航到选项卡时在 TextBox 中分配值。打开时,我试图将搜索 TextBox 的值更新为用户可能通过 TextBox 设置的单元格的值其他选项卡之一。有问题的范围是单个单元格:

Private Sub Worksheet_Activate()
    ActiveWindow.Zoom = 100
    ActiveSheet.ScatterCustomerSearch.Value = _
        Worksheets("Selection Sheet").Range("Customer_Search").Value     
End Sub

值赋值,之前工作得很好,突然给了我一个438 error,说object doesn't support this property or method。以前可以,现在突然不行了

有什么建议吗?

可能是可怕的 Microsoft update

关闭所有办公应用程序,然后删除此文件:

C:\Users[用户名]\AppData\Local\Temp\Excel8.0\MSForms.exd

这是一个临时文件,再次打开时会重新创建 Excel。看看这是否能解决您的问题。