VBA技巧：让代码识别工作表中的形状

完美Excel · 公众号 · Excel · 2024-05-14 05:30

学习Excel技术，关注微信公众号：excelperfect标签：VBAQ：我在工作表中放置有一些形状，例如圆形、矩形等，我想当我在工作表中使用鼠标单击这些形状时能够根据单击的形状有不同的操作，该如何实现？我想在一个过程中实现，而不是每个形状关联不同的过程。如下图1所示，当我使用鼠标单击上方的圆形时，会执行一个操作；单击下方的矩形时，会执行另一个操作，但这两个形状都关联相同的过程。图1A：在示例工作表中，将上方的圆形命名为“椭圆示例”，下方的矩形命名为“圆角矩形”。按Alt+F11键，打开VBE编辑器，插入一个标准模块，在其中输入代码：Sub testShape() If Application.Caller = "椭圆示例" Then MsgBox "你单击了椭圆." ElseIf Application.Caller = "圆角矩形" Then MsgBox "你单击了圆角矩形." Else MsgBox "没有单击到任何形 ………………………………

原文地址：访问原文地址
快照地址：访问文章快照

分享到微博

推荐文章

Excel之家ExcelHome · 分享几个常用函数公式，效率提高1.3%

昨天

Excel之家ExcelHome · 这些公式都学会，天天加班不嫌累

3 天前

Excel之家ExcelHome · Excel高考测试题（江苏卷）

4 天前

Excel之家ExcelHome · 用饼图展示任务完成状况

5 天前

Excel之家ExcelHome · 财务会计必会的Excel数据处理技巧 - 第2季

5 天前

春城晚报 · 导盲犬巴顿

7 月前

常岩CY · 谁也没想到D9能在MPV这个品类里卖得这么好。腾势D9 5月销售-20230602113656

1 年前

铅笔道 · 订单缩水90%，日流水不足500元：流血出局

1 年前

中国基金报 · 行业老将邱春杨出任长城基金总经理！今年换帅基金公司竟有这么多（名单）

3 年前

解螺旋 · 实验太繁琐，代码不会写，怎么靠数据库连发20篇SCI?

4 年前