2009-10-19 83 views
1

我想隱藏用戶在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表單的建議?

回答

2

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

Target.Parent.Parent.Visible = False 

爲什麼更換

ActiveSheet.Visible = False 

  1. 「目標」是被鏈接的單元格。
  2. 該小區的Parent是超鏈接
  3. 父即細胞是工作表的源小區
+0

當你處理VBA時,沒有什麼奇怪的。完美工作。 – 2009-10-20 12:33:09

0

最好的解決方案可能是創建片材,可以是列表當每個工作表處於活動狀態時都可見,則不使用FollowHyperlink事件,而是使用Worksheet_Activate事件來隱藏/取消隱藏必要工作表。