You need to enable JavaScript to run this app.
优惠活动
大模型
产品
解决方案
定价
更多

求助:Word文档批量将Case: BE########格式编号设为加粗下划线

批量格式化Word中案件编号的解决方案

方法一:用Word自带查找替换快速处理

  • 按Ctrl+H打开查找替换窗口,点击「更多」展开高级选项
  • 在「查找内容」输入框中填入:Case: BE^########(^#是Word查找里代表任意单个数字的通配符,8个就对应8位数字)
  • 点击「格式」→「字体」,设置加粗和单下划线,确认后返回替换窗口
  • 「替换为」框留空(只改格式不改内容),点击「全部替换」即可完成所有编号的格式修改

方法二:用VBA宏实现自动化

如果习惯用宏处理,可按以下步骤操作:

  • 按Alt+F11打开VBA编辑器
  • 右键左侧项目栏的文档名称,选择「插入」→「模块」
  • 将以下代码粘贴到模块中:
Sub FormatCaseIDs()
    With ActiveDocument.Content.Find
        .ClearFormatting
        .Text = "Case: BE########"
        .MatchWildcards = True ' 启用通配符匹配
        .Replacement.ClearFormatting
        .Replacement.Font.Bold = True ' 设置加粗
        .Replacement.Font.Underline = wdUnderlineSingle ' 设置单下划线
        .Execute Replace:=wdReplaceAll ' 批量替换所有匹配项
    End With
End Sub
  • 按F5运行宏,或者回到Word界面,通过「开发工具」→「宏」选择FormatCaseIDs执行

关键说明

  • 通配符模式下,#代表任意单个数字,所以Case: BE########能精准匹配所有以Case: BE:开头后跟8位数字的编号
  • 宏代码里可以同时设置加粗和下划线,解决你之前录制宏只能单步操作的问题

内容的提问来源于stack exchange,提问作者Jamie Opperlee

相关产品推荐
方舟 Agent Plan

超全模态模型 × Harness 升级,最新支持 Deepseek-V4.1-Flash、GLM-5.3 系列、Doubao-Seedream-5.0-pro、Kimi-K3 (部分), 限时 9.9 元起

最近更新时间:2026.06.27 01:13:12