2013-08-04 55 views
0

我在電子表格的單元格J24中有超鏈接。我想在用戶點擊超鏈接時打開一個winform。在我以前的VBA這很簡單:FollowHyperlink打開winform

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink) 


If Target.Parent.Address = "$L$48" Then 

     frm.Show 

End if 

但是,我現在已經過渡到VB.net。我看到,我有followHyperlink事件,但是當我嘗試以下沒有工作:

Private Sub dsbEmployeeBoard_FollowHyperlink(Target As Microsoft.Office.Interop.Excel.Hyperlink) Handles Me.FollowHyperlink 

    Dim test As New frmCustomRanges 

    If Target.Parent.Address = "$L$48" Then 

     test.Show() 


    End If 


End Sub 

有沒有誰知道如何在VB.net做到這一點?

回答

2

你必須連線了事件的子過程:

Addhandler worksheet.FollowHyperLink, AddressOf FollowHyperlink 

或添加處理程序語句子(必須對變量WITHEVENTS聲明這一項工作):

Private WithEvents Worksheet As {WorkSheet} 
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink) Handles Worksheet.FollowHyperlink