查看: 554|回复: 12
提取条件的对应最大日期值
阅读权限20
在线时间 小时
提取条件的对应最大日期值
(40.92 KB, 下载次数: 26)
11:11 上传
点击文件名下载附件
阅读权限50
在线时间 小时
好像前面有6个条件，根据你列的公式中，标样这个条件不要的吗?
阅读权限20
在线时间 小时
好像前面有6个条件，根据你列的公式中，标样这个条件不要的吗?
就3个条件在加1个日期，就不知那出错
阅读权限50
在线时间 小时
=IF(MAX((A$2:A$17&B$2:B$17&D$2:D$17=A2&B2&D2)*($G$2:$G$17))=G2,H2,&&)数组公式，下拉，你选择到10000列，这个运行慢，一个是下面都是空白的，就会导致数据错误复制代码
阅读权限20
在线时间 小时
的确是改为少行不报错，但一改多行就报错，而就是要用到这么多行，
阅读权限100
在线时间 小时
=LOOKUP(1,0/(MAX(IF(A$2:A$10000&B$2:B$10000&D$2:D$1&D2,$G$2:$G$10000))=IF(A$2:A$10000&B$2:B$10000&D$2:D$1&D2,$G$2:$G$10000)),H$2:H$10000)复制代码（数组公式按三键后下拉）——你的附件看上去四个条件{&客户&,&规格&,&标样&,&等级&}，其实只要是同一客户，后面三个都一样，实际表格是这样的吗？（如果确是这样，公式可以不考虑后面三个条件）
阅读权限20
在线时间 小时
& & & & & & & &
（数组公式按三键后下拉）——你的附件看上去四个条件{&客户&,&规格&,&标样&,&等级&}，其实只要是同一客户 ...
不是的，实际各个条件都并不一样，所以一定要有3个条件，谢
阅读权限100
在线时间 小时
不是的，实际各个条件都并不一样，所以一定要有3个条件，谢
上面公式还是沿用你原来的多条件的公式
阅读权限20
在线时间 小时
（数组公式按三键后下拉）——你的附件看上去四个条件{&客户&,&规格&,&标样&,&等级&}，其实只要是同一客户 ...
类似不能用，出现整列都显示一样的数值
阅读权限20
在线时间 小时
上面公式还是沿用你原来的多条件的公式
结果要好像“&列只显示最后日的数值
最新热点 /1
ExcelHome每周都有线上直播公开课，
国内一流讲师真身分享，高手贴身答疑，
赶不上直播还能看录像，
关键居然是免费的！
厚木哥们都已经这么努力了，
你还好意思说学不好Office。
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师我要文库申报
查看: 2763|回复: 1
如何在一列日期数据中提取每个月的最后期记录？
积分学习力
魅力值 影响力
消费券 Ti币好友
在线时间 小时
最后登录月度优秀 次管理次数 次
网站名称: Excel技巧网 | Excel专家栖息谷 | 微软中文技术社区合作伙伴站内采编:
署名作者: liuguansky
版权声明: 版权归本站与作者共有 除本站官方外非作者本人严禁转载
适用版本: 03以前版本&
语言环境: 简体中文
学习方法: 掌握Excel技巧的关键是动手操作
下载 ≠ 知识
免费注册成为本站会员，享用更多功能，结识更多Office办公高手！
才可以下载或查看，没有帐号？
Q：如何在一列日期数据中提取每个月的最后期记录？[假设日期数据为乱序排列]
A：用如下代码可以实现：
Sub justtest()
&&Dim dic, arr, i&, str1$, str2$, str3, arrt, arrre, j&
&&Set dic = CreateObject(&scripting.dictionary&)
&&arr = Cells(1, 1).CurrentRegion
&&For i = 2 To UBound(arr, 1)
& & str1 = Format(arr(i, 3), &yyyy-m&)
& & str2 = Format(arr(i, 3), &d&)
& & str3 = arr(i, 1) & vbTab & arr(i, 2) & vbTab & arr(i, 3)
& & If dic.exists(str1) Then
& && &If Val(Format(Split(dic(str1), vbTab)(2), &d&)) &= Val(str2) Then
& && &&&dic(str1) = str3
& && &End If
& && &Else: dic.Add str1, str3
& & End If
&&Next i
&&Range(&e:g&).Clear
&&Cells(1, &e&).Resize(1, 3) = Application.Index(arr, 1)
&&If dic.Count & 0 Then
& & arrt = dic.items
& & ReDim arrre(1 To dic.Count, 1 To 3)
& & For i = 1 To dic.Count
& && &For j = 1 To 3
& && &&&arrre(i, j) = Split(arrt(i - 1), vbTab)(j - 1)
& & Next j, i
& & Cells(2, &e&).Resize(i - 1, 3) = arrre
&&End If
&&Set dic = Nothing
End Sub复制代码
中级二, 积分 757, 距离下一级还需 293 积分
积分学习力
魅力值 影响力
消费券 Ti币好友
在线时间 小时
最后登录月度优秀 次
本帖最后由 wqfzqgk 于
23:35 编辑
Sub ddddd()
Set d = CreateObject(&scripting.dictionary&)
arr = Range(&a210:c2&)
For i = 1 To 209
d(Split(arr(i, 3), &/&)(0) & Split(arr(i, 3), &/&)(1)) = arr(i, 1) & &%& & arr(i, 2) & &%& & arr(i, 3)
Next
Range(&h2&).Resize(d.Count, 1) = Application.WorksheetFunction.Transpose(d.items)
Application.DisplayAlerts = False
Range(&h:h&).TextToColumns other:=True, otherchar:=&%&
Application.DisplayAlerts = True
End Sub复制代码有个小缺点，和上面的程序一样，如果有相同的最大日期的话，只能提一个，呵呵，对了我这个忘了一开始排序啦，不然的话，乱序就不对，只是一句代码
用分列操作，学习了。
站长推荐 /1
40集公式入门动画教程，一天带你打好公式的基础。
Excel技巧网的会员探讨问题仅代表其个人意见，与网站的立场无关。任何违反国家和地方相关法律法规的言论，本站有义务协助政府相关部门追究发言者的责任！
本站中非注明转载文章与案例的版权为作者与Excel技巧网共有。若非原文作者，本站之外任何单位或个人未经允许，不得将其用于商业用途。
若非原文作者，任何形式的非商业性转载必须获得Excel技巧网或作者允许，并注明作者和出处。
会员发表的帖子如涉及版权纠纷，须自行负责。详情请参考注册时的网站服务条款。
本站特聘法律顾问：沈学律师
Powered by查看: 1046|回复: 11
如何根据日期自动提取对应列的数据
阅读权限10
在线时间 小时
　　各位大神，工作需要遇到问题了，希望实现在E1中输入日期，E4:E18区域中自动提取对应日期的C列数据，VLOOKUP能做到么？如果做不到有别的函数能实现么？见附件
10:49 上传
点击文件名下载附件
7 KB, 下载次数: 34
阅读权限30
在线时间 小时
=IFERROR(INDEX(C:C,SMALL(IF(B:B=$E$1,ROW(B:B),&&),ROW(1:1))),&&)
数组公式 下拉
阅读权限30
在线时间 小时
=INDEX($C$1:$C$19,SMALL(IF($B$1:$B$19=$E$1,ROW($B$1:$B$19),20),ROW(A1)))&&&
阅读权限30
在线时间 小时
请参考附件
11:04 上传
点击文件名下载附件
8.1 KB, 下载次数: 32
阅读权限20
在线时间 小时
=IFERROR(INDEX($C:$C,SMALL(IF($B$2:$B$19=$E$1,ROW($B$2:$B$19)),ROW(A1))),&&)复制代码
阅读权限30
在线时间 小时
公供参考，不知能否合意。
11:05 上传
点击文件名下载附件
7.87 KB, 下载次数: 19
阅读权限20
在线时间 小时
添加辅助列，最基础的方法；
11:05 上传
点击文件名下载附件
9.69 KB, 下载次数: 20
阅读权限30
在线时间 小时
其实用高级筛选也挺好的
阅读权限10
在线时间 小时
=IFERROR(INDEX(C:C,SMALL(IF(B:B=$E$1,ROW(B:B),&&),ROW(1:1))),&&)
数组公式 下拉
这个好像不行...出不了结果
阅读权限30
在线时间 小时
这个好像不行...出不了结果
ctrl+shift+enter&&结束输入 看4楼附件
最新热点 /1
ExcelHome每周都有线上直播公开课，
国内一流讲师真身分享，高手贴身答疑，
赶不上直播还能看录像，
关键居然是免费的！
厚木哥们都已经这么努力了，
你还好意思说学不好Office。
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师在 SegmentFault，解决技术问题
每个月，我们帮助 1000 万的开发者解决各种各样的技术问题。并助力他们在技术能力、职业生涯、影响力上获得提升。
一线的工程师、著名开源项目的作者们，都在这里：
获取验证码
已有账号？
问题对人有帮助，内容完整，我也想知道答案
问题没有实际价值，缺少关键内容，没有改进余地
excel中单元格格式已经设置，有选一个我要的日期格式了，可是读取出来的还是数字，请问该如何解决？excel中的日期是 0:00，可是读取出来是42747
答案对人有帮助，有参考价值
答案没帮助，是错误的答案，答非所问
数字？ 时间戳？
var date = new Date();
// 然后你就可以 针对这个 date 操作了
如果是 42747 这种，试试 var a = new Date(747)
同步到新浪微博
分享到微博？
关闭理由：
删除理由：
忽略理由：
推广（招聘、广告、SEO 等）方面的内容
与已有问题重复（请编辑该提问指向已有相同问题）
答非所问，不符合答题要求
宜作评论而非答案
带有人身攻击、辱骂、仇恨等违反条款的内容
无法获得确切结果的问题
非开发直接相关的问题
非技术提问的讨论型问题
其他原因（请补充说明）
我要该，理由是：}