请教如何批量设置批注属性?

qingjingye

Crazymen 发表于 2010-4-24 12:35
我自己常用的工具之一，抛砖引玉，别见笑
Sub 设置批注属性()
Dim TTT$

赐教：我的批注格式大部分设置成了：对齐-自动调整大小；对象位置-大小固定，位置随单元格而变。如何批量设置，将对象位置改回“大小、位置均固定”。谢谢。

q05312

Crazymen 发表于 2010-4-24 12:35
我自己常用的工具之一，抛砖引玉，别见笑
Sub 设置批注属性()
Dim TTT$

能否解决：大小、位置随单元格而变？

ytxwzw

Crazymen 发表于 2010-4-24 12:38
顺便提提，以上代码，仅仅是设置批注的属性，位置没有改动，如果要将批注移回默认位置，需要用另一段代码

想知道另一段代码。位置和大小随单元格改变，谢谢了

lanseshuibei

Crazymen 发表于 2010-4-24 12:35
我自己常用的工具之一，抛砖引玉，别见笑
Sub 设置批注属性()
Dim TTT$

有一个问题，这个是根据标注所在单元的位置移动而移动
没有办法更根据所标注单元格本身位置移动而移动。
比如  我标注的是A1单元格， 但是标注本身位置在C3
代码是跟着C3移动而移动，没法跟着A1移动而移动

lanseshuibei

Crazymen 发表于 2010-4-24 12:38
顺便提提，以上代码，仅仅是设置批注的属性，位置没有改动，如果要将批注移回默认位置，需要用另一段代码

代码贡献出来把

叶子Excel

我还是觉得，批注改成备注单独加一列比较好，或者改成数据验证，输入信息，批注这个在不同版本打开的话，会有丢失，或者不可读取，修改内容也不太方便

zl5781055

Crazymen 发表于 2010-4-24 12:35
我自己常用的工具之一，抛砖引玉，别见笑
Sub 设置批注属性()
Dim TTT$

请教老师，把批注框拉回默认位置的代码

六明

遇到代码就有点看不明白~~~~~