zoukankan      html  css  js  c++  java
  • 用AutoHotkey重置Excel的Ctrl+Alt+方向键选择的范围

    当前选择是蓝色单元格,原来的Ctrl+Alt+方向键,是选中【蓝色】到【红色】单元格的区域,

    经过脚本修改后,则是【蓝色】到【黄色】的区域,应该更符合日常使用,

    特别是表格比较大的时候,一直按住鼠标滚动选择单元格太累人了,还不能出错。

    下面附上代码:

    <^+Up::
    <^+Down::
    <^+Left::
    <^+Right::
    xl := ComObjActive("Excel.Application")
    RegExMatch(xl.Selection.CurrentRegion.Address, "$(w+)$(d+):$(w+)$(d+)", m)
    ;m1-m4分别是A1:F7(假设)里的A,1,F,7
    rowStart := m2
    rowEnd := m4
    colStart := m1
    colEnd := m3
    addressSelect := xl.Selection.Address
    RegExMatch(addressSelect, "$(w+)$(d+)", m) ;m1,m2分别为选中单元格C3(假设)的C和3
    rowSelect := m2
    colSelect := m1
    If InStr(A_ThisHotkey, "Up")
        xl.ActiveSheet.Range(colSelect . rowStart . ":" . addressSelect).Select
    Else If InStr(A_ThisHotkey, "Down")
        xl.ActiveSheet.Range(addressSelect . ":" . colSelect . rowEnd).Select
    Else If InStr(A_ThisHotkey, "Left")
        xl.ActiveSheet.Range(colStart . rowSelect . ":" . addressSelect).Select
    Else If InStr(A_ThisHotkey, "Right")
        xl.ActiveSheet.Range(addressSelect . ":" . colEnd . rowSelect).Select
    Return
  • 相关阅读:
    Python注释及变量
    MySQL期末测试
    SQL查询第三次训练(重点关照对象)
    MySQL内置函数
    聚类-kmeans
    《达.芬奇密码》丹-布朗
    皮克定理与证明
    常见设计模式的种类与一些原则
    时间序列(二)分解、各部分计算方法
    ADF检验
  • 原文地址:https://www.cnblogs.com/hyaray/p/7507304.html
Copyright © 2011-2022 走看看