event Worksheet_FollowHyperlink werkt niet

[Hans Gorter]

Allerlei events op dezelfde sheet doen het allemaal,
Application.EnableEvents staat op true
De hyperlink werkt (dus is echte hyperlink)
en toch wordt het followHyperlink niet getriggerd.

Code:
Private Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
MsgBox "hello world"
End Sub

Wie o wie?

Vast dank!

 

[Roncancio]

Een beetje flauw maar er staat 2 * Private.

Private [COLOR="Red"][B]Private[/B][/COLOR] Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)

Met vriendelijke groet,


Roncancio

 

[Hans Gorter]

Een beetje flauw maar er staat 2 * Private.

Goed gezien, maar dat komt door onhandig kopietje, in het eggie staat er maar één keer private.