查询每天最早的记录和最晚的记录

最新推荐文章于 2022-09-20 00:03:00 发布

weixin_34038652

最新推荐文章于 2022-09-20 00:03:00 发布

阅读量2.4k

点赞数

文章标签：数据库操作系统大数据

select price,time from(

select price,time,date from 
(
select price,time,date from on_jiaoyi_into where sid=3
order by date,time desc
) a

) b group by date

关注博主即可阅读全文

确定要放弃本次机会？

福利倒计时

: :

立减 ¥

普通VIP年卡可用

立即使用

weixin_34038652

关注关注

0
点赞
踩
1

收藏

觉得还不错? 一键收藏
0
评论
分享

复制链接

分享到 QQ

分享到新浪微博

扫一扫
举报

举报

Github上传代码没有contribution和activity记录

**My Coding Family**

09-26

1238

确保 Git 配置的邮箱和 GitHub 账号一致。确保提交到默认分支master或main确保仓库是公开的。确保提交中有实际代码变更。等待几分钟后再检查 GitHub 页面更新。这样做应该可以解决 GitHub 不显示贡献和活动的问题。如果问题依旧存在，可以尝试重新推送代码，并确保所有提交都满足上述条件。希望如上措施及解决方案能够帮到有需要的你。

手账文化：记录生活中的意义时刻

AI天才研究院

03-01

766

手账文化作为一种独特的记录方式，不仅帮助我们捕捉生活中的意义时刻，还提升了我们的生活质量和自我认知。从起源到发展，从记录到表达，从个人应用到社会互动，手账文化展现出其丰富的内涵和广阔的应用前景。展望未来，手账文化将在数字化、国际化和创新发展的推动下，继续繁荣发展，为我们的生活带来更多的美好和意义。让我们携手探索手账文化的无限可能，让每一天都成为值得记录的美好时刻。

参与评论您还未登录，请先登录后发表或查看评论

sql实现当天最晚一次数据和最早一次的数据计算

qq_44214380的博客

09-20

1768

【代码】sql根据时间实现当天最晚时间点数据和最早时间点数据的计算。

mysql导入打卡记录，查询员工每天最早上班时间和最晚下班时间

gywtzh0889的专栏

11-24

1万+

1、在数据库新建表card_records，根据打卡记录字段新建表的字段，新增id字段（自增） 2、利用navicat连接mysql数据库，导入打卡记录右键新建的表，右键导入向导，选择导入的文件格式，我这里是excel2003，有时候mysql对excel2007不能正确打开，可以另存为excel2003 点击下一步，选择打卡记录所在的位置，以及数据在的sheet，我的数据

【三等奖观察记录】中班喝水是一项任务.docx

04-14

在第七届全国幼儿教师职业技能大赛中，一篇以“喝水是一项任务”为主题的中班观察记录荣获三等奖。该记录聚焦于如何帮助中班的孩子们（约4-5岁）养成主动喝水的习惯。在观察中发现，中班的孩子们在没有老师提醒的...

初中语文文摘历史京城最早的自来水

09-09

这个数字的背后，是清末中国现代化进程中一个关键事件的成功实施，也记录着社会对于新事物接受过程中的种种挑战与应对措施。京城自来水工程的建设，不仅改善了城市的消防能力，也极大地提升了市民的生活质量。更...

幼儿园一周食谱记录表.docx

12-14

食谱记录表的核心目的在于详细记录一周内幼儿园每天提供的所有餐点，包括早餐、加餐、午餐、午点和晚餐。在记录表的开篇，我们会发现一个清晰的表头，通常会标注“幼儿园一周食谱记录表”，紧接着会有一个时间段...

查询每天最早和最晚一次数据，并比较判断时间

qq_35086941的博客

04-01

3650

查询每天最早一次时间和最晚一次时间 mysql部分 left（str，10）是指str自动从左往右取10个字段 select xx,xx,MIN(datetime) as am,MAX(datetime) as pm from xxxx GROUP BY left(datetime,10); 后台判断比较时间 int late = 0; int leave = 0; SimpleDateForm...

sql查找最晚一天，日期最大的一条记录两种方法

weixin_30919429的博客

12-21

1万+

例：查找最晚入职员工的所有信息CREATE TABLE `employees` (`emp_no` int(11) NOT NULL,`birth_date` date NOT NULL,`first_name` varchar(14) NOT NULL,`last_name` varchar(16) NOT NULL,`gender` char(1) NOT NULL,`hire_date` d...

SQL SERVER 统计一段时间内每天的数据

最新发布

03-08

<think>好的，我现在需要解决用户的问题：在Excel中，有工号、日期和多个打卡时间，要求用VBA计算每个人每天的最早和最晚打卡时间。让我仔细想想该怎么做。首先，我得理解数据结构。用户的数据应该包含三列：工号、日期、打卡时间。每个员工每天可能有多次打卡记录。目标是对每个员工每天的打卡时间找出最早和最晚的时间。接下来，我需要确定处理步骤。可能的步骤包括： 1. **数据排序**：按工号和日期排序，这样同一员工同一天的数据会集中在一起，方便处理。 2. **遍历数据**：逐行检查，当工号或日期变化时，记录前一个员工日期的打卡时间。 3. **提取时间**：对于每个员工每天的打卡时间，比较并找到最早和最晚的时间。 4. **输出结果**：将结果写入新的工作表或指定位置。然后，我需要考虑如何用VBA实现这些步骤。可能的VBA方法包括： - 使用字典（Dictionary）来存储每个员工和日期对应的打卡时间集合。字典的键可以是工号和日期的组合，值则是一个集合或数组，存储所有打卡时间。 - 循环遍历每一行数据，将时间添加到对应的字典条目中。 - 处理完所有数据后，遍历字典的每个键，计算最小和最大时间，并输出结果。需要注意的是，日期和时间在Excel中的处理。确保打卡时间被正确识别为时间格式，否则比较可能会出错。此外，处理大量数据时，需要考虑性能问题，比如关闭屏幕更新和自动计算。可能遇到的挑战包括： - **数据格式不一致**：比如日期或时间存储为文本，需要转换为正确的格式。 - **跨天打卡**：如果打卡时间跨过午夜，可能需要特殊处理，但用户的问题中指定是“每天”，所以假设所有打卡时间都属于同一日期。 - **重复数据或空值**：需要处理可能的空单元格或无效数据，避免运行时错误。代码结构的大致思路： 1. 声明变量，包括字典、工作表对象、循环变量等。 2. 初始化字典，可能需要引用Scripting.Runtime库。 3. 循环遍历数据行，将工号和日期组合作为键，时间存入数组。 4. 对每个键的数组进行排序或查找最小最大值。 5. 将结果输出到指定位置，可能需要新建工作表或覆盖原有数据。测试案例也很重要。例如，同一员工同一天有三个打卡时间：08:00, 12:30, 18:00，应得到最早08:00，最晚18:00。需要确保代码正确处理这种情况。最后，代码可能需要优化，比如使用数组读取数据而不是逐行处理，以提高效率，尤其是在数据量大的情况下。</think>以下是使用VBA实现「按工号+日期统计最早/最晚打卡时间」的解决方案： ```vba Sub CalculatePunchTimes() Dim ws As Worksheet Dim dict As Object Dim lastRow As Long, i As Long Dim key As String Dim punchTime As Date Dim minTime As Date, maxTime As Date Dim outputRow As Long ' 设置数据源工作表（根据实际情况修改名称） Set ws = ThisWorkbook.Sheets("考勤记录") ' 创建字典存储数据 Set dict = CreateObject("Scripting.Dictionary") ' 获取最后一行数据 lastRow = ws.Cells(ws.Rows.Count, 1).End(xlUp).Row ' 遍历数据行 For i = 2 To lastRow ' 假设第一行是标题 key = ws.Cells(i, 1).Value & "|" & Format(ws.Cells(i, 2).Value, "yyyymmdd") punchTime = TimeValue(ws.Cells(i, 3).Value) ' 如果键不存在则初始化数组 If Not dict.Exists(key) Then dict.Add key, Array(punchTime, punchTime) Else ' 更新最早和最晚时间 minTime = Application.Min(dict(key)(0), punchTime) maxTime = Application.Max(dict(key)(1), punchTime) dict(key) = Array(minTime, maxTime) End If Next i ' 创建结果表 With ThisWorkbook.Sheets.Add(After:=ThisWorkbook.S