Word 下取消高亮度显示
2012-06-22 14:34
288 查看
以下VBA代码会高亮度显示“Microsoft Word”
如果要取消对“Word”的高亮度显示你可能会这样写:
结果你会发现你所有的高亮度显示都会不见了。这是因为第二个程序中的Find和第一个程序中的Find作用范围是一样的。所以当你取消高亮的时候所有的高亮显示都回被取消。真确的写法应该是这样的:
Sub HighLight() Dim rang As Range Dim fnd As Find Set rang = ActiveDocument.Range Set fnd = rang.Find fnd.Text = "Microsoft Word" fnd.MatchWholeWord = True fnd.HitHighlight ("Microsoft Word") Set fnd = Nothing Set rang = Nothing End Sub
如果要取消对“Word”的高亮度显示你可能会这样写:
Sub CleanHighLight1() Dim rang As Range Dim fnd As Find Set rang = ActiveDocument.Range Set fnd = rang.Find fnd.Text = "Word" fnd.MatchWholeWord = True fnd.HitHighlight ("Word") fnd.ClearHitHighlight Set fnd = Nothing Set rang = Nothing End Sub
结果你会发现你所有的高亮度显示都会不见了。这是因为第二个程序中的Find和第一个程序中的Find作用范围是一样的。所以当你取消高亮的时候所有的高亮显示都回被取消。真确的写法应该是这样的:
Sub CleanHighLight2() Dim rang As Range Dim fnd As Find Dim subr As Range Set rang = ActiveDocument.Range Set fnd = rang.Find While fnd.Execute("Word") rang.Select With rang.Find .Text = "Word" .ClearHitHighlight End With Wend Set fnd = Nothing Set rang = Nothing End Sub
相关文章推荐
- Word 下取消高亮度显示
- 在word中按空格键,显示有小的圆点怎么取消
- 【办公-WORD】取消英文单词或字符串下红色和绿色波浪线的显示
- 【其它】单击word目录超链接老显示“由于本机的限制,该操作已被取消。请于系统管理员联系”
- 09-word不显示段落标记(去掉回车符号)取消拼写错误
- 取消COM调用word,ppt时显示的正在切换对话框
- 取消COM调用word,ppt时显示的正在切换对话框
- word文档中图片不显示的问题以及解决
- 在数据表中字段存有excel、word文件数据,让其随着记录指针移动而改变显示
- PHP是如何显示“hello word”的?
- 在VC中调用WORD(显示,修改,存盘,运行宏)之三。调用word的各种对话框翻页等。
- DatePickerDialog和TimePickerDialog添加确认和取消按钮,优化显示
- 可执行程序无法在Linux上运行,显示line 1: syntax error: word unexpected (expecting ") .
- VI中如何取消匹配字的颜色显示
- word中如何让第n页显示页码
- 如何批量把excel中已显示的科学计数法取消
- fckeditor粘贴Word时弹出窗口取消的方法
- Word 2010中前面几页不显示页码的方法
- 点击对话框外部取消对话框显示设置
- Word 2007表格怎么设置标题行重复跨页显示