FollowHyperlink打开winform

Question

我的电子表格的单元格J24中有一个超链接。我想在用户点击超链接时打开一个winform。在我过去的VBA中，这非常简单：

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中完成此任务？

Answer 1

您必须使用事件连接子例程：

Addhandler worksheet.FollowHyperLink, AddressOf FollowHyperlink

或将handler语句添加到sub（必须在变量上使用WithEvents声明才能使用此语句）：

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