大家帮忙调一个程序

一只小蝈蝈 2005-02-26 09:19:46
Sub a()
Selection.Shading.BackgroundPatternColorIndex = wdDarkRed
End Sub
Sub b()
With Selection.Find
.Font.Shading.BackgroundPatternColorIndex = wdDarkRed
.Execute
End With

End Sub
先运行a,再运行B,在word97 word2003下程序B能查到 相应的文字,但是在word2000下不能找 到相应的文字,不知何故!!
...全文
107 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
沐NeMo 2005-03-02
  • 打赏
  • 举报
回复
我在word2002运行了也不可以找到。
一只小蝈蝈 2005-02-28
  • 打赏
  • 举报
回复
大家帮忙

5,138

社区成员

发帖
与我相关
我的任务
社区描述
其他开发语言 Office开发/ VBA
社区管理员
  • Office开发/ VBA社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧