AHK快捷键（2）——仅粘贴值、复制求和
创作者俱乐部成员
如果您有类似快捷键的需求，或者对现有功能不满意，请回帖说明，我会尽快更新😁
这次添加两个鼠标快捷键，并完善一下脚本：
鼠标中键，仅粘贴值，且剪贴板里的内容变成纯文本，之后可以把复制的区域当成多行文本粘贴到一个单元格里
鼠标侧键1，可以对选中的单元格求和，结果存入剪贴板，之后可以用中键或ctrl-v粘贴出来
鼠标侧键2，对选中区域求和，之后合并单元格，合并单元格的值设为和
| 👌 | #Requires AutoHotkey v2.0 #SingleInstance Force GetWPS() { try { return ComObjActive("Ket.Application") } catch { MsgBox "等待COM注册", , "0 T0.6" return ComObjActive("Ket.Application") } } ; WPS #HotIf WinActive("ahk_exe wps.exe") MButton:: { A_Clipboard := A_Clipboard SendEvent "{LButton}^v" } XButton1:: { Send "!;" et := GetWPS() A_Clipboard := et.WorksheetFunction.Sum(et.Selection) et := "" ToolTip "Sum: " . A_Clipboard SetTimer () => ToolTip(), -1000 } XButton2:: { et := GetWPS() n := et.WorksheetFunction.Sum(et.Selection) et.Selection.Merge et.Selection.Value2 := n et := "" } #HotIf |
更新的代码可以从网址https://gitee.com/wanghan519/ahk4wps得到
发行版里不定时更新打包成exe的版本，下载解压即可使用
创作者俱乐部成员