Word中的书签功能可快速.准确定位文档中特定的位置,经常用于模板定制.文档产出等. 可一直以来,书签功能存在一个不便的操作,即无法批量删除,只能单个删除,操作极不友好. 解决方案 我用代码暂时还改变不了世界,但可以提高工作效率.使用两VBA代码,即可完成遍历.删除. ALT+F11,打开VBA编辑器,在ThisDocument页面写下语句,F5执行即可. Sub DelBookmarks() Dim MyBk As Bookmark For Each MyBk In ActiveDocumen
最近在工作中因为要遇到大量的Word文件转化为PDF文件来实现平台的迁移.但是由于文件太多,手动很费力,想到了用代码的方式: 复制下面的代码,保存的记事本,另存为vbs文件:然后把这个vbs文件放到你要转PDF的文件夹里(doc和docx文件都可以).双击运行,等待 Word文件已全部轩换为PDF格式! 的对话框 代表已经全部转化完成. 如果各位复制执行有问题,下面留言,我会第一时间帮助大家解决问题. On Error Resume Next Set oWord = WScript.Create
For i = 1 To ActiveDocument.Tables.Count ActiveDocument.Tables(i).Cell(1, 1).Select With Selection .SelectRow .Font.Bold = True .Shading.BackgroundPatternColor = -603923969 End With ActiveDocument.Tables(i).Range.Font.Size = 10 Next 宏内容:修改表格第一行字体为粗体,