跨工作表单元格差异高亮代码性能优化求助：7000行数据运行过慢

各位大佬好，想请教个VBA代码性能优化的问题，实在是卡得没办法了😭

我现在要做的是对比两个工作表里的数据集——这俩是同一份数据的不同版本，会定期更新，我得追踪里面的变化：要分别高亮修改过的单元格和新增的单元格，高亮的单元格底色和字体颜色都是用户预先设定好的。

我写的代码在100行的小测试样本里跑着没问题，但放到实际有大概7000行的文件里，运行时间长得离谱，简直要等一辈子。后来我加了个进度条稍微改善了下用户体验，但核心的性能瓶颈还是没解决。

下面是我目前的代码片段：

Sub Highlight()

    Dim DataRange As Range
    Dim SelCell As Range
    Dim CurVer As String
    Dim CompVer As String
    Dim IntColMod As Long
    Dim IntColAdd As Long
    Dim FontColMod As Long
    Dim FontColAdd As Long
    Dim ModCellCount As Long
    Dim AddCellCount As Long

    'Pre-defined highlight format
    IntColMod = Worksheets("Version recon").Range(&q...

有没有大佬能给点思路，怎么让这段代码处理大行数的时候快起来呀？万分感谢！

备注：内容来源于stack exchange，提问作者Abhi264