文本框值分配突然不起作用
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。看看这是否能解决您的问题。
我有一本将于 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。看看这是否能解决您的问题。