Excel之实现鼠标点击完成自动累加功能

有时我们需要做一个混淆矩阵或者统计系统，在处理实验数据时希望点击某个单元格即可完成数据累加。

1.按"ALT"+"F11"键进入宏编辑状态，双击你要处理的表名。

2.把以下代码复制到窗体内，保存。

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range,
Cancel As Boolean)
Target = Target + 1
End Sub

3.右上角关闭，即可实现双击任意单元格（防止误点，对同一单元格多次累加时中间需要先点击一下其他单元格，否则会进入编辑状态），该单元格的值就会自动加1.

如果你想要单击即可加一，则复制以下代码：

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Target = Target + 1
End Sub

Excel之实现鼠标点击完成自动累加功能相关推荐

Excel vba开发合并单元格拆分自动填充功能、在每一条数据后面插入空白行、将地理坐标的经纬度转换成度等功能
写在前面: 最近老大丢给我一个数据量比较大,比较复杂的表,让我用VB去处理,刚被分到这个任务的时候一脸茫然,对Excel VB开发一点都不了解,所以就自己研究并查资料,最后终于解决了. 一.Excel ...
巧用DBGrid控件的Sort属性实现“点击标题栏自动排序功能”。(改进版本)
曾看见CSDN文档中有介绍到:通过ADOQuery或其它数据集组件的Sort属性配合DBGrid的OnTitleClick事件,可以方便地实现此功能.因为Sort属性可以让活动数据集按指定的字段进行排 ...
点击编辑框全选内容java,js实现鼠标点击文本框自动选中内容的方法
本文实例讲述了js实现鼠标点击文本框自动选中内容的方法.分享给大家供大家参考.具体如下: 这里使用JS实现鼠标点击时自动选中文本框文本的效果,相信许多朋友都遇到这种功能的,就是当我们点击文本框的时候, ...
java怎样自动调用鼠标点击屏幕固定地方_python办公自动化：让PyAutoGUI来帮你干活...
做不完的工作,写不完的文档,粘贴不完的excel,打不完的 word,讨厌的996,今天我将会带领一个你专属的机器人送给你,让它来代替你做这些重复性的工作,只要你能动脑经把工作分解成若干步可重复的劳动 ...
vba模拟鼠标点击_核对数据总看错，试试这个方法，点击单元格自动为整行填充颜色...
Hello,大家好,今天跟大家分享我们如何实现实现点击一个单元格,自动为数据区域的整行填充一个颜色,效果如下图,当我们点击一个单元格的时候们就会为整行填充一个颜色,这个的操作跟我们之前分享的聚光灯效果 ...
unity3d]鼠标点击地面人物自动走动(也包含按键wasdspace控制)
目录(?)[-] 一效果图二大概步骤创建一个plane设置层为Terrain因为后面要判断是否点击的是这个层准备好人物模型并且将三个脚本拖放到人物上并且将动画文件也拖放好记得看前面提醒哦 Thi ...
地图点击区域高亮 vue_这个Excel技巧很强大，鼠标点击即高亮显示数据区域
单于吹落山头月.漫漫江上沙如雪.谁唱缕金衣.水寒船舫稀.芦花枫叶浦.忆抱琵琶语.身未发长沙.梦魂先到家. ------[宋]王观<菩萨蛮·单于吹落山头月> 之前给大家分享过,当我们根据 ...
python实现键盘自动输入_人生苦短我用Python——模拟鼠标点击和键盘输入的操作...
通过Python可以模拟鼠标点击和键盘输入的操作,进而可以实现一些比较有趣的功能,例如游戏挂机.自动发消息等. 本文以自动发消息为例,实现该功能,通过该代码可以自动往QQ.微信发送任意内容.首先考虑想 ...
python实现自动点击器_Python模拟鼠标点击实现方法(将通过实例自动化模拟在360浏览器中自动搜索python)...
一.准备工作: 安装pywin32,后面开发需要pywin32的支持,否则无法完成与windows层面相关的操作. pywin32的具体安装及注意事项: 1.整体开发环境: 基于windows7操作系 ...

Excel之实现鼠标点击完成自动累加功能

Excel之实现鼠标点击完成自动累加功能相关推荐

最新文章

热门文章