请教老师，工作表标签事件，提示：运行时错误438的问题

7016427

执行附件，工作表标签事件，提示：运行时错误438，请教老师怎么处理？

月关

在Sheet2的激活事件里写如果Sheet1单元格里有批注则把Sheet1激活？
这个逻辑上就有问题吧？
想要实现的是当Sheet2激活时Sheet1的批注隐藏？

7016427

月关 发表于 2019-8-24 08:35
在Sheet2的激活事件里写如果Sheet1单元格里有批注则把Sheet1激活？
这个逻辑上就有问题吧？
想要实现的是 ...

请问老师，怎么改？

7016427

这个难题谁能解决！！！

月关

7016427 发表于 2019-8-24 09:12
这个难题谁能解决！！！

1. Private Sub Worksheet_Activate()
   
2. Set x = Sheet1.Cells.SpecialCells(-4144)
   
3. If Not x Is Nothing Then
   
4. For Each rn In x
   
5. rn.Comment.Visible = False
   
6. Next
   
7. End If
   
8. End Sub

复制代码

月关

7016427 发表于 2019-8-24 09:12
这个难题谁能解决！！！

在审核  。。。。

月关

7016427

月关 发表于 2019-8-24 09:20

您好！“Set x = Sheet1.Cells.SpecialCells(-4144)”这句是什么意思？

月关

7016427 发表于 2019-8-24 09:33
您好！“Set x = Sheet1.Cells.SpecialCells(-4144)”这句是什么意思？

定位到sheet1中有批注的单元格