2013-08-04 112 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