Excel, ThisAddIn.vb: почему не вызывается Application.SheetFollowHyperlink для = HYPERLINK ()
Я пытаюсь обнаружить нажатие гиперссылок в Excel. Событие Application.SheetFollowHyperlinkтребования что это будет называтьсяпри нажатии любой гиперссылки в Microsoft Excel. "
Тем не менее, хотя он срабатывает, когда ячейка содержит URL-адрес, какwww.google.com
Это не когда ячейка содержит.=HYPERLINK("http://www.google.com", "google")
Как я могу обнаружить клики на гиперссылку второго типа?
Например, простой Excel добавить в:
Public Class ThisAddIn
Private Sub ThisAddIn_Startup(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Startup
End Sub
Private Sub ThisAddIn_Shutdown(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Shutdown
End Sub
Private Sub Application_SheetFollowHyperlink(ByVal Sh As Object, ByVal Target As Microsoft.Office.Interop.Excel.Hyperlink) Handles Application.SheetFollowHyperlink
MsgBox("Hyperlink Clicked")
End Sub
Окно сообщения, содержащее "Гиперссылка нажала " появится при нажатии на ячейку, содержащуюwww.google.com
но не клетка, содержащая.=HYPERLINK("http://www.google.com", "google")