如何在表格中筛选出相同数据的最近日期行？

发布网友 发布时间：2022-02-26 04:28

我来回答

共5个回答

热心网友 时间：2022-02-26 05:58

软件版本：Office2007

方法如下：

1.如下数据，筛选出A列相同数据对应的B列最近日期行；选择数据区域，点击排序：

2.A列作为主要关键字排序，B列作为次要关键字降序排序：

3.然后选择数据区域，点击“删除重复项”：

4.选择A列，点击确定：

5.得到想要的结果：

热心网友 时间：2022-02-26 07:16

用vba编程可以实现。举例说明。

例如有数据表如图：

第一步：选择单元格E1，点击数据-数据有效性。如图：

第二步：选择序列-区域$B2：$B31.如图：

第三步：点击开发工具-visual basic。

第四步：在当前工作表中编写代码如下：

Private Sub Worksheet_Change(ByVal Target As Range)

With Target

  If .Address(0, 0) = "E1" Then

     SL = Range("E1").Value

     RQ = 0

     i = 2

     Do While Cells(i, 1) <> ""

        If Cells(i, 2) = SL Then

           RQ = IIf(RQ > Cells(i, 1).Value, RQ, Cells(i, 1).Value)

        End If

        i = i + 1

     Loop

     ActiveSheet.Range("$A$1:$B$31").AutoFilter Field:=2, Criteria1:="=" & Trim(Str(SL)), _

        Operator:=xlAnd

     ActiveSheet.Range("$A$1:$B$31").AutoFilter Field:=1, Operator:= _

        xlFilterValues, Criteria2:=Array(2, RQ)

  End If

End With

End Sub

第五步：选择单元格E1，选择数量400.结果如图：

热心网友 时间：2022-02-26 08:50

先按照第一列排序，然后对数据分类汇总：分类字段选第一列，汇总方式选“最大值”，汇总项选第二列，见下图：

热心网友 时间：2022-02-26 10:42

热心网友 时间：2022-02-26 12:50