隐藏家长页面超链接Excel

问题描述:

我想隐藏用户在Excel中单击超链接时将查看的当前页面,并将它们带到同一工作簿中的其他工作表。我尝试使用以下代码隐藏家长页面超链接Excel

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink) 
    On Error GoTo Cleanup 
    ActiveSheet.Visible = False 
    Application.EnableEvents = False 
    Target.Follow 
Cleanup: 
    Application.EnableEvents = True 
End Sub 

因为我假定activesheet将是该超链接上,而不是目标片,然而,ActiveSheet是目标片的片材。有关如何隐藏partnet表单的建议?

这是要健全奇怪,但你需要

Target.Parent.Parent.Visible = False 

为什么更换

ActiveSheet.Visible = False 

  1. “目标”是被链接的单元格。
  2. 该小区的Parent是超链接
  3. 父即细胞是工作表的源小区
+0

当你处理VBA时,没有什么奇怪的。完美工作。 – 2009-10-20 12:33:09

最好的解决方案可能是创建片材,可以是列表当每个工作表处于活动状态时都可见,则不使用FollowHyperlink事件,而是使用Worksheet_Activate事件来隐藏/取消隐藏必要工作表。