数据不一致的格式填充

陈小猪

如下图，数据表有很多列数据，希望能够快速将不一致的数据标记出来继续跟进，有什么办法吗？
Expect和Entered的间隔都是固定的，不知道有什么快速的办法没

一本爱笑的舒

不知道这样能满足你的需求不

陈小猪

一本爱笑的舒 发表于 2022-6-10 10:10
不知道这样能满足你的需求不

继续请教一下，怎么将这个快速应用到其他数据列？

一本爱笑的舒

陈小猪 发表于 2022-6-10 10:20
继续请教一下，怎么将这个快速应用到其他数据列？

我知道的就只能利用宏了，宏我不怎么会，只会录制一个宏，然后修改里面的数据，然后运行。
-------
下面是代码



Sub Macro1()
'
' Macro1 Macro
' 宏由 Administrator 录制，时间: 2022/06/10
'

'
    Range("B4:C999").Select
    Selection.FormatConditions.Add Type:=xlExpression, Operator:=-1, Formula1:="=$B4<>$C4", Formula2:=""
    Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
    Selection.FormatConditions(1).Interior.Pattern = xlPatternSolid
    Selection.FormatConditions(1).Interior.PatternColorIndex = -4105
    Selection.FormatConditions(1).Interior.PatternTintAndShade = 0
    Selection.FormatConditions(1).Interior.Color = 65535
    Selection.FormatConditions(1).Interior.TintAndShade = 0
    Selection.FormatConditions(1).StopIfTrue = False
   
   
        Range("E4:F999").Select
    Selection.FormatConditions.Add Type:=xlExpression, Operator:=-1, Formula1:="=$E4<>$F4", Formula2:=""
    Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
    Selection.FormatConditions(1).Interior.Pattern = xlPatternSolid
    Selection.FormatConditions(1).Interior.PatternColorIndex = -4105
    Selection.FormatConditions(1).Interior.PatternTintAndShade = 0
    Selection.FormatConditions(1).Interior.Color = 65535
    Selection.FormatConditions(1).Interior.TintAndShade = 0
    Selection.FormatConditions(1).StopIfTrue = False
   
   
         Range("H4:I999").Select
    Selection.FormatConditions.Add Type:=xlExpression, Operator:=-1, Formula1:="=$H4<>$I4", Formula2:=""
    Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
    Selection.FormatConditions(1).Interior.Pattern = xlPatternSolid
    Selection.FormatConditions(1).Interior.PatternColorIndex = -4105
    Selection.FormatConditions(1).Interior.PatternTintAndShade = 0
    Selection.FormatConditions(1).Interior.Color = 65535
    Selection.FormatConditions(1).Interior.TintAndShade = 0
    Selection.FormatConditions(1).StopIfTrue = False
      
End Sub

一本爱笑的舒

陈小猪

一本爱笑的舒 发表于 2022-6-10 11:14

感谢感谢！！！
我也不会宏，坐等大神指点

nevercool

’