当前位置: 首页 > news >正文

VBA 程序运行中禁用鼠标键盘

1. Application.Interactive

False:Excel 将阻止键盘和鼠标的所有输入,但代码显示的对话框的输入不受影响。

True:打开交互模式。

下面的代码程序一旦运行就会限定在Excel的事先选定的单元格输出。

如果注释掉Application.Interactive = False的话,输出会跟随鼠标选定的单元格即时输出。

Option ExplicitSub DisableMouse()Dim i As LongOn Error GoTo ErrHandle:'禁止交互Application.Interactive = FalseFor i = 1 To 3000DoEventsSelection = iNext i'恢復交互Application.Interactive = TrueExit Sub
ErrHandle:'恢復交互Application.Interactive = TrueMsgBox Err.DescriptionEnd Sub

相关文章:

  • 北京网站建设多少钱?
  • 辽宁网页制作哪家好_网站建设
  • 高端品牌网站建设_汉中网站制作
  • 单 元 测 试
  • 前端工程师学习springboot2.x之配置idea热更新实现高效率开发节奏
  • 顶级期刊即插即用模块代码共享计划·2024第一期:01:波叠加原理的社会池化方法(AAAI2023)与并行补丁感知注意力模块(2024)代码实现
  • IntelliJ IDEA 2024.2 夏季大版本发布,不得不说,更强了!
  • WEB应用(十三)---RCE
  • 【Pytorch实用教程】PyTorch中.to(device)和.cuda()有什么区别?
  • 基于SSM的环境监测管理系统设计
  • 学习vue3 六,兄弟组件传参,provide/inject
  • 一键登录,打造华为账号便捷新体验
  • npm vs pnpm 之幽灵依赖
  • qt客户端与服务端通信
  • 谷粒商城实战笔记-140-商城业务-nginx-搭建域名访问环境二(负载均衡到网关)
  • Roaringbitmap+Mysql构建标签--实际使用问题
  • CACTER直播预告:重保期间邮件网关与SMC2如何多维度防护
  • 常见的框架漏洞
  • 【刷算法】从上往下打印二叉树
  • Angular 2 DI - IoC DI - 1
  • angular2 简述
  • CSS 专业技巧
  • Nacos系列:Nacos的Java SDK使用
  • SegmentFault 技术周刊 Vol.27 - Git 学习宝典:程序员走江湖必备
  • Web标准制定过程
  • yii2权限控制rbac之rule详细讲解
  • 如何用Ubuntu和Xen来设置Kubernetes?
  • 使用 Xcode 的 Target 区分开发和生产环境
  • 使用Swoole加速Laravel(正式环境中)
  • 微信小程序:实现悬浮返回和分享按钮
  • 详解移动APP与web APP的区别
  • 小而合理的前端理论:rscss和rsjs
  • 因为阿里,他们成了“杭漂”
  • 硬币翻转问题,区间操作
  • 阿里云重庆大学大数据训练营落地分享
  • ​比特币大跌的 2 个原因
  • # 详解 JS 中的事件循环、宏/微任务、Primise对象、定时器函数,以及其在工作中的应用和注意事项
  • #进阶:轻量级ORM框架Dapper的使用教程与原理详解
  • $.type 怎么精确判断对象类型的 --(源码学习2)
  • (1)Android开发优化---------UI优化
  • (C语言)求出1,2,5三个数不同个数组合为100的组合个数
  • (C语言)输入自定义个数的整数,打印出最大值和最小值
  • (done) NLP “bag-of-words“ 方法 (带有二元分类和多元分类两个例子)词袋模型、BoW
  • (js)循环条件满足时终止循环
  • (贪心 + 双指针) LeetCode 455. 分发饼干
  • (一)Docker基本介绍
  • (转)Oracle存储过程编写经验和优化措施
  • (轉貼)《OOD启思录》:61条面向对象设计的经验原则 (OO)
  • *算法训练(leetcode)第三十九天 | 115. 不同的子序列、583. 两个字符串的删除操作、72. 编辑距离
  • .[hudsonL@cock.li].mkp勒索加密数据库完美恢复---惜分飞
  • .bat批处理(六):替换字符串中匹配的子串
  • .Net IE10 _doPostBack 未定义
  • .NET 实现 NTFS 文件系统的硬链接 mklink /J(Junction)
  • .NET/C# 反射的的性能数据,以及高性能开发建议(反射获取 Attribute 和反射调用方法)
  • .net快速开发框架源码分享
  • .NET连接数据库方式
  • // an array of int
  • /etc/apt/sources.list 和 /etc/apt/sources.list.d