VBA EXCEL - 查找列中最早的日期

Question

目前正在开发一个函数，作为其中的一部分，我需要在 VBA 的列中查找最旧的日期。花了一段时间寻找解决方案，但找不到太多。我发现了一行，但它实际上不起作用。我将发布我的代码片段，但任何建议或解决方案将不胜感激！

Public Function SetSOWDates() As String

    Dim wsCRC As Worksheet
    Set wsCRC = Worksheets("CRC")

    Dim LastRowInCRC As Long

    LastRowInCRC = CRC.LastRowInCRC()

    LatestDate = Format(wsCRC.Max(Range("K8:K" & LastRowInCRC)), "dd/mm/yyyy")

    Debug.Print LatestDate

End Function

Answer 1

您想要Min, 不是Max最早的日期，并且它是 的成员WorksheetFunction而不是Worksheet：

LatestDate = Format(Worksheetfunction.Min(wsCRC.Range("K8:K" & LastRowInCRC)), "dd/mm/yyyy")