批量删除源代码安全审计报告中具有相同内容的单行表格

我们经常会遇到一些办公问题，比如需要针对源代码安全审计报告进行批量处理，批量删除源代码安全审计报告中具有相同内容的单行表格。

原始报告：

需要批量删除带有“审计日志：”的整行

可以直接通过 word 或者 wps的VB 宏进行操作

Sub DeleteRowsContainingText()    Dim doc As Document    Dim table As table    Dim row As row    Dim i As Integer    Dim textToFind As String
    textToFind = "审计日志：" ' 替换为你要查找的具体内容
    Set doc = ActiveDocument    For Each table In doc.Tables
        For i = table.Rows.Count To 1 Step -1
            ' 判断是否有纵向合并的单元格            On Error Resume Next              Dim test As Integer            test = table.Rows(i).Cells.Count             If Err.Number <> 0 Then                Err.Clear            Else                If InStr(table.Rows(i).Range.Text, textToFind) > 0 Then                    table.Rows(i).Delete                End If            End If            On Error GoTo 0         Next i
    Next tableEnd Sub

WPS

执行后会卡顿几秒到几分钟时间，静静等待即可！

Office Word

执行后会卡顿几秒到几分钟时间，静静等待即可！

办公软件必须支持 VB 支持宏

推荐使用：

微软 Office 2021 批量许可版24年02月更新版

# 什么叫微软Office批量许可版？
Volume（批量版也称商业版或大客户批量授权版，缩写VL或VOL）
﹂适用企业客户批量许可部署的版本，无需转换可以通过使用KMS激活授权
﹂安装可以自定义组件和安装位置，无需第三方部署工具[2010/2013/2016]
Retail（零售版也称消费者版，32和64位共用安装包，要转换才能KMS激活）

下载地址

Microsoft Office LTSC 专业增强版2021 简体中文批量许可版原版集成2024年2月更新完整ISO镜像
::Microsoft Office LTSC 2021 Pro Plus / Visio + Project 2108 Build 14332.20637 x64 Feb 2024

https://pan.quark.cn/s/9cb600ce0906

https://www.123pan.com/s/A6cA-XsHJh

https://pan.baidu.com/s/1N2jHgNV55iTeE-Dq9M12pA?pwd=2023

WPS Office 2019专业增强版_v11.8.2.12195

下载地址

WPS Office 2019 专业增强版 11.8.2.12195 永久激活版（去广告/免升级/免激活/永久授权）WPS Office 2016 专业增强版 v10.8.2.7119 永久激活版（无广告/免升级/免激活/永久授权）

https://www.123pan.com/s/A6cA-DlHJh

https://423down.lanzov.com/b0f2ql3be

https://pan.baidu.com/s/1e7u1mYPZxYkZy9tf6qCOSg?pwd=2023

WPS Office 2019 专业版、繁体版（11.8.2.12195）

此版特点：

集成 VBA
集成序列号
去除密匙校验
去除我的电脑wps云盘图标
去除wpscloudsvr服务
去除升级计划任务

静默安装参数：
禁用云服务：/NoCloud
启用云服务：/Cloud

下载地址：

横向打印预览显示不全问题大家可以找官方反馈试试，这个是官方 BUG，目前没有找到什么办法解决。

阿里云：https://www.aliyundrive.com/s/E3fkhbTNZMP
123 盘：https://www.123pan.com/s/QdiA-Ft4mh

原文始发于微信公众号（利刃信安）：【办公技巧】批量删除源代码安全审计报告中具有相同内容的单行表格