excel 求某个参数最新的日期
答案:3 悬赏:0 手机版
解决时间 2021-11-22 09:17
- 提问者网友:斑駁影
- 2021-11-21 10:59
excel 求某个参数最新的日期
最佳答案
- 五星知识达人网友:舊物识亽
- 2021-11-21 11:16
D1=MAX((A1:A3=1)*(MAX(B1:B3)))
测试表格式如下:
追问并不行 兄弟追答方法一:
I2 按你格式做的=MAX(($B$2:$B$9=H2)*($C$2:$C$9))
数组哦,公式不太,不得怎么卡;
在不行,就用VBA了;
方法二:
这个最快:下附件,看图操作;
网页链接
Sub test()
Dim cnn
Dim rs
Set cnn = CreateObject("adodb.connection") '创建ado对象
Set rs = CreateObject("ADODB.recordset") '创建记录集
Dim sql As String
cnn.Open "Provider=Microsoft.Ace.OleDB.12.0;extended properties=excel 8.0;data Source=" & ThisWorkbook.Path & "123.xlsm"
sql = "select 编号,max(日期) as 最大日期 from [Sheet1$] group by 编号 "
rs.Open sql, cnn
Range("g2").CopyFromRecordset rs
rs.Close
cnn.Close
End Sub
测试表格式如下:
追问并不行 兄弟追答方法一:
I2 按你格式做的=MAX(($B$2:$B$9=H2)*($C$2:$C$9))
数组哦,公式不太,不得怎么卡;
在不行,就用VBA了;
方法二:
这个最快:下附件,看图操作;
网页链接
Sub test()
Dim cnn
Dim rs
Set cnn = CreateObject("adodb.connection") '创建ado对象
Set rs = CreateObject("ADODB.recordset") '创建记录集
Dim sql As String
cnn.Open "Provider=Microsoft.Ace.OleDB.12.0;extended properties=excel 8.0;data Source=" & ThisWorkbook.Path & "123.xlsm"
sql = "select 编号,max(日期) as 最大日期 from [Sheet1$] group by 编号 "
rs.Open sql, cnn
Range("g2").CopyFromRecordset rs
rs.Close
cnn.Close
End Sub
全部回答
- 1楼网友:低血压的长颈鹿
- 2021-11-21 13:43
VBA字典,速度快追问不会啊 你能不能帮下
- 2楼网友:慢性怪人
- 2021-11-21 12:11
你这个分析的就是全部数据,少分析一个都不行,所以必须数组解决。
数据公式如下:
=MAX((B2:B11=E2)*C2:C11)
如果你使用了10万行数据,用啥公式都卡。
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯