AutoHotkey的A_CaretX/Y在OneNote 2016无效，如何解决？

这个情况我太熟悉了！你代码本身没写错——MouseMove, %A_CaretX%, %A_CaretY%在Word里正常工作，是因为Word用的是系统标准的插入符（caret），AutoHotkey的内置变量能直接捕获到。但OneNote 2016不一样，它的光标是自己绘制的自定义控件，完全不依赖系统级的插入符机制，所以A_CaretX和A_CaretY根本抓不到它的位置，自然就失效了。

可行替代方案：用UI Automation获取OneNote光标位置 #

OneNote虽然不兼容系统插入符检测，但可以通过Windows的UI Automation框架直接访问它内部的控件结构，精准定位到自定义光标。以下是针对AutoHotkey 1.1.30.03版本的可用代码：

; 激活OneNote窗口（确保它在前台）
WinActivate, ahk_exe ONENOTE.EXE
WinWaitActive, ahk_exe ONENOTE.EXE

; 初始化UI Automation对象
UIA := ComObjCreate("UIAutomationClient.CUIAutomation")
RootElement := UIA.GetRootElement()

; 定位OneNote的编辑区域控件（控件类型为Edit）
EditCondition := UIA.CreatePropertyCondition(30003, 5) ; 30003=ControlType, 5=Edit控件
EditElement := RootElement.FindFirst(4, EditCondition) ; 4=搜索子元素范围

if (EditElement) {
    ; 查找编辑区域内的光标（Caret控件）
    CaretCondition := UIA.CreatePropertyCondition(30003, 20) ; 20=Caret控件
    CaretElement := EditElement.FindFirst(4, CaretCondition)
    
    if (CaretElement) {
        ; 获取光标所在的矩形区域，取左上角作为鼠标目标位置
        CaretElement.GetCurrentPropertyValue(30002, BoundingRect) ; 30002=BoundingRectangle
        MouseMove, % BoundingRect.Left, % BoundingRect.Top, 0 ; 0=瞬间移动，可改成100等数值实现平滑移动
    } else {
        MsgBox, 未检测到OneNote的光标，请确保编辑区域处于激活状态！
    }
} else {
    MsgBox, 未找到OneNote的编辑区域，请确认OneNote已打开并处于编辑状态！
}

代码说明： #

• 先激活OneNote窗口，确保操作的是当前前台的编辑区域
• 通过UI Automation遍历控件树，找到OneNote的编辑框和内部的自定义光标
• 获取光标所在的矩形坐标，将鼠标移动到光标位置

这段代码不需要额外安装库，AutoHotkey 1.1版本自带对COM对象的支持，直接运行即可。如果遇到偶尔定位失败的情况，可以在WinWaitActive后加个Sleep 200给OneNote一点响应时间。

内容的提问来源于stack exchange，提问作者David H. J.