word.app: 怎么获取鼠标点击事件

word.app: 如何获取鼠标点击事件？
现创建一个 word.application, 打开了一个文档，
现需要获取用户点击鼠标后鼠标坐在位置的单词，并对其进行处理。
但发现无法切取鼠标事件。

谁知道如何做？谢谢！


没法，系统提示只能发表30分以内的帖子。本来打算给100分的。


[解决办法]
对了，访问插入符所在位置的单词

VB code

Private Sub vWordApp_WindowSelectionChange(ByVal Sel As Selection)    Dim vWord As Range    For Each vWord In Sel.Words        Debug.Print vWord.Text    Next vWordEnd Sub