[已解决]看似不能实现的技巧:批量替换批注的内容

cafkyy · 发表于 2010-8-12 07:43

Sub abc()     For Each cl In ActiveSheet.Comments         If InStr(cl.Text, "ab") Then         cl.Text (Replace(cl.Text, "ab", "abceeffff"))         End If     Next End Sub

业余爱好者 · 发表于 2010-8-13 08:47

学习一下  [em01]

小_笨_笨 · 发表于 2010-8-13 11:01

向高手学习

EXEXCELLER · 发表于 2010-8-13 20:43

见所未见

xmlinxinzhi · 发表于 2010-8-18 22:34

学习

leejo · 发表于 2010-8-19 21:08

kankan 好好学习一下

fushuiyoulan · 发表于 2010-8-22 22:56

我也学习一下

leroy · 发表于 2010-8-23 23:26

感觉不是太难，看下答案

wml514166604 · 发表于 2010-8-27 13:29

看看

fk1758 · 发表于 2010-9-2 13:26

[em01]

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

[已解决]看似不能实现的技巧:批量替换批注的内容

浏览过的版块