如何在Excel中突出显示不遵循确切格式的单元格？

Question

尝试将数据从Access数据库文件导出到SQL Server 2012时，我收到错误数据错误。经过调查，我找到了表格和列，导致错误。

该列包含日期'mm / dd / yyyy'格式的数据，似乎有一些错误的条目。

目前我正在尝试查找错误数据，但有4000多行数据。作为出路，我决定使用excel来使用它的条件格式。但是，我找不到/创建一个符合我需要的规则。

所以我想在寻找其他东西之前先问一下：是否有办法（公式或规则）突出显示不遵循正确格式的单元格？

例如，我需要的格式为'mm / dd / yyyy'，因此01/01/2016将是正确的，而1/1/2016或01/01/16将突出显示。

Answer 1

在 A 列中显示“日期”，此小子标记将黄色中的文本单元格和绿色中格式错误的日期单元格标记：

Sub DateCheck()
    Dim r As Range, s As String, DQ As String
    DQ = Chr(34)
    For Each r In Intersect(Range("A:A"), ActiveSheet.UsedRange)
        If r.Value <> "" Then
            s = Evaluate("Cell(" & DQ & "type" & DQ & "," & r.Address(0, 0) & ")")
            If s = "l" Then
                r.Interior.Color = vbYellow
            ElseIf r.NumberFormat <> "mm/dd/yyyy" Then
                r.Interior.Color = vbGreen
            End If
        End If
    Next r
End Sub