如何在 Excel 中将时间转换为整数小时或分钟?
在 Excel 中,用户经常需要处理时间值,用于排班、跟踪时长或计算总工时。默认情况下,当您使用类似 =单元格*24 的公式将时间转换为小时,或使用 =单元格*1440 转换为分钟时,Excel 会返回小数值,表示精确的小时或分钟分数。然而,在许多实际场景中(例如薪资计算、报表编制或资源分配),您可能需要将这些时间值转换为整数小时或分钟(例如,将 5.6 小时向下取整为 5 小时,或将 16.7 分钟向上取整为 17 分钟)。本指南为您介绍几种实现整数转换的实用方法,并解析各自的应用场景与注意事项,助您根据实际需求轻松选择最佳方案。
使用 Kutools for Excel 将时间转换为整数小时或分钟
使用公式将时间转换为整数小时或分钟
如果您希望借助 Excel 公式快速解决问题,不妨使用 INT 函数将时间值转换为整数小时或分钟——当无需小数部分时(例如按班次统计完整工作时长,或舍入至最后一个已完成的分钟),这一方法尤为实用。
要使用此公式,请选择要显示结果的单元格,然后根据您的需求输入以下任一公式:
- 转换为整数小时:=INT(A2*24)
- 转换为整数分钟:=INT(A2*1440)
输入公式后,按 Enter 即可显示结果。如需转换多个时间值,请向下拖动填充柄,将公式快速应用到其他单元格。
注意:INT 函数始终向下舍入,因此 6.9 小时之类的值会显示为 6. 如需其他舍入方式(向上或四舍五入),请参阅下方的其他解决方案。
使用 Kutools for Excel 将时间转换为整数小时或分钟
如果您已安装 Kutools for Excel,将时间转换为整数小时或分钟将更加高效灵活。Kutools for Excel 的时间转换工具可先将时间转换为小数,再通过其舍入功能向上、向下或四舍五入到最接近的整数。此方法适用于批量转换,尤其在处理大型数据集时,可避免繁琐的手动公式输入。
1. 选择要转换的时间值范围,然后依次点击 Kutools > 内容 > 时间转换 > 转换为小时 或转换为分(根据您的需求选择)。
2. 转换完成后,系统将弹出对话框,提示已成功转换的单元格数量;点击确定关闭对话框。保持已转换的单元格处于选中状态,然后点击 Kutools> 舍入。
![]() | ![]() | ![]() |
3. 在不使用公式的四舍五入对话框中,在 0 文本框内输入小数位数,即可将数值舍入到最接近的整数。在选项部分选择所需的舍入选项:四舍五入(舍入到最接近的整数)、向上舍入或向下舍入。
4. 点击确定即可应用舍入操作,所有选中的值将被转换为整数小时或分钟。
如果您需要在多个工作表中重复执行转换和舍入操作,推荐使用 Kutools,其菜单式界面可有效减少公式错误。
使用 VBA 宏将时间转换为整数小时或分钟
此方案适用于希望在大型数据集中自动将时间值转换为整数小时或分钟,或对多个区域应用转换而无需手动输入公式的用户。VBA 宏允许您在向下舍入、向上舍入或四舍五入之间进行选择,并可根据您的需求进行自定义。
1. 点击开发工具>Visual Basic。在弹出的 Microsoft Visual Basic for Applications 窗口中,点击插入> 模块,然后将下方代码粘贴到该模块中:
Sub ConvertTimeToInteger_OutputElsewhere()
Dim rng As Range
Dim cell As Range
Dim resType As String
Dim roundMethod As String
Dim outRng As Range
Dim xTitleId As String
Dim val As Double, res As Double
xTitleId = "KutoolsforExcel"
On Error Resume Next
Set rng = Application.Selection
Set rng = Application.InputBox("Select range to convert:", xTitleId, rng.Address, Type:=8)
If rng Is Nothing Then Exit Sub
On Error GoTo 0
On Error Resume Next
Set outRng = Application.InputBox("Select a cell for output:", xTitleId, Type:=8)
If outRng Is Nothing Then Exit Sub
On Error GoTo 0
resType = Application.InputBox("Choose type (Hour/Minute):", xTitleId, "Hour", Type:=2)
roundMethod = Application.InputBox("Rounding method (Down/Up/Nearest):", xTitleId, "Down", Type:=2)
For Each cell In rng
If IsNumeric(cell.Value) Then
If UCase(resType) = "HOUR" Then
val = cell.Value * 24
Else
val = cell.Value * 1440
End If
Select Case UCase(roundMethod)
Case "UP"
res = WorksheetFunction.RoundUp(val, 0)
Case "NEAREST"
res = WorksheetFunction.Round(val, 0)
Case Else
res = WorksheetFunction.RoundDown(val, 0)
End Select
outRng.Offset(cell.Row - rng.Row, cell.Column - rng.Column).Value = res
End If
Next cell
MsgBox "Conversion completed! Results placed starting at " & outRng.Address, vbInformation
End Sub
2. 要运行代码,请点击 VBA 窗口中的
按钮。系统将弹出对话框,提示您选择目标区域和输出单元格、指定“小时”或“分钟”转换方式,并设置所需的舍入规则。宏将根据您的选择,自动将所有指定的时间单元格转换为整数。
使用 Excel 舍入公式对小时或分钟进行舍入
当您需要灵活控制舍入方式(向上、向下或四舍五入)时,Excel 提供了多种内置舍入函数。此方案适用于对精确性与灵活性要求较高的场景,例如在薪资计算中始终将不足一小时的部分向上舍入,或在时间日志中将时间四舍五入至最接近的分钟。
1. 在要显示结果的单元格(例如 B2)中输入以下任一公式:
- 四舍五入到最接近的整数小时:
=ROUND(A2*24,0) - 向下舍入到整数小时:
=ROUNDDOWN(A2*24,0) - 向上舍入到整数小时:
=ROUNDUP(A2*24,0) - 四舍五入到最接近的整数分钟:
=ROUND(A2*1440,0) - 向下舍入到整数分钟:
=ROUNDDOWN(A2*1440,0) - 向上舍入到整数分钟:
=ROUNDUP(A2*1440,0)
2. 按 Enter 确认公式,然后从输入公式的单元格向下拖动填充柄,即可快速将公式复制到整列时间值。请根据您的实际数据区域调整相应的单元格引用。
ROUND、ROUNDUP 和 ROUNDDOWN 函数的行为各不相同:使用 ROUND 获取最接近的整数,使用 ROUNDUP 确保任何小数部分都向上舍入,使用 ROUNDDOWN 始终向下舍入。请选择最适合您场景的函数。
最佳办公效率工具
| 🤖 | KUTOOLS AI 助手:基于以下内容革新数据分析:智能执行 | 生成代码| 创建自定义公式 | 数据分析及生成图表| 调用 Kutools Functions…… |
| 热门功能:查找、高亮或标记重复项 | 删除空白行 | 合并列或单元格且不丢失数据 | 不使用公式的四舍五入…… | |
| 高级 LOOKUP:多条件 VLookup | 多值 VLookup | 跨多工作表 VLookup | 模糊查找…… | |
| 高级下拉列表:快速创建下拉列表 | 级联下拉列表 | 多选下拉列表…… | |
| 列管理器:添加指定数量的列|移动列|切换隐藏列的可见性状态|比较区域与列…… | |
| 特色功能:网格聚焦 | 设计视图 |增强编辑栏 | 工作簿和表管理器 | 资源库(自动文本)| 日期提取 | 汇总工作表 | 加密/解密单元格 | 按列表发送邮件 | 超级筛选 | 特殊筛选(筛选粗体单元格/斜体/删除线……) ...... | |
| 精选 15 工具集:12 文本工具(添加文本,删除特定字符,……)| 50+ 图表 类型(甘特图,……)| 40+ 实用公式(基于生日计算年龄,……)| 19 插入工具(插入二维码,从路径插入图片,……)| 12 转换工具(小写金额转大写,汇率转换,……)| 7 合并和拆分工具(高级合并行,分割单元格,……)|……更多 |
使用 Kutools for Excel 大幅提升您的 Excel 技能,体验前所未有的高效。Kutools for Excel 提供 300 多项高级功能,助您提升生产力、节省时间。立即点击此处,获取您最需要的功能……
Office Tab 为 Office 带来标签式界面,让您的工作更轻松
- 在 Word、Excel、PowerPoint、Publisher、Access、Visio 和 Project 中启用标签式编辑和阅读。
- 在同一个窗口的新标签页中打开并创建多个文档,而非在新窗口中。
- 将您的工作效率提升 50%,每天减少数百次鼠标点击!
所有 Kutools 插件,一个安装程序
Kutools for Office 套件捆绑了适用于 Excel、Word、Outlook 和 PowerPoint 的插件以及 Office Tab Pro,非常适合需要跨多个 Office 应用高效协作的团队。
- 一体化套件— Excel、Word、Outlook 和 PowerPoint 插件 + Office Tab Pro
- 一个安装程序,一个许可证— 几分钟内完成设置(支持 MSI)
- 协同效果更佳— 在多个 Office 应用中实现高效协同
- 30 天全功能试用— 无需注册,无需信用卡
- 超值之选— 比单独购买插件更省钱


