求助自动添加单元格批注的VBA代码

riversky0604 · 发表于 2020-1-15 16:07

本帖最后由 riversky0604 于 2020-1-16 07:48 编辑

求助高手达人，帮忙写自动添加单元格批注的VBA代码（以下两个方案，各写出一个最好，不然写出一个也感激不尽）。

方案1：当选中区域G3;AQ6,D10:K80,M10:BA46中任意单元格时，根据单元格内容在工作表【Details】中查找（索引列为K列，结果在AA列），将查找到的结果添加为选中单元格的批注内容。如果未查找到则不添加批注。
批注要能根据内容大小自动调整合适的宽度和高度。
VBA触发条件：选中目标区域任意单元格时。

方案2：目标区域G3;AQ6,D10:K80,M10:BA46内所有的单元格，根据单元格内容在工作表【Details】中查找（索引列为K列，结果在AA列），将查找到的结果批量添加为单元格的批注内容，未查找到的单元格不添加批注。
批注要能根据内容大小自动调整合适的宽度和高度。
VBA触发条件：目标区域内容有变更或工作表【Details】内容有变更时。

数据源请参附件。
谢谢！

riversky0604 · 发表于 2020-1-16 09:30

有大佬能帮忙看看么？

zjdh · 发表于 2020-1-16 13:35

其他都可办到，就是“批注要能根据内容大小自动调整合适的宽度和高度。”难办，因你的AA列数据不一致，有的带回车，有的不带回车。

riversky0604 · 发表于 2020-1-16 13:39

zjdh 发表于 2020-1-16 13:35
其他都可办到，就是“批注要能根据内容大小自动调整合适的宽度和高度。”难办，因你的AA列数据不一致，有的 ...

如果困难的话就忽略这条要求吧。

yes363001640 · 发表于 2020-1-16 13:47

刚好有一个自动批注，自动大小的，你可以参考下，没设置范围。自己修改吧。

zjdh · 发表于 2020-1-16 20:55

用那句自动大小的语句：
有回车符的数据显示正常，与我原来的方法一样：

zjdh · 发表于 2020-1-16 20:55

没有回车符的数据显示就太难看了：

zjdh · 发表于 2020-1-16 21:03

还是固定大小吧：
有回车符的数据显示

zjdh · 发表于 2020-1-16 21:04

没有回车符的数据显示

zjdh · 发表于 2020-1-16 21:05

有回车符的数据显示

		自动登录	找回密码
密码			免费注册

[求助] 求助自动添加单元格批注的VBA代码

最新热点 /1