UC知道excel 自动加1 30 时间 问题 悬赏5
来源：百度知道 编辑：UC知道 时间：2024/06/14 10:50:57
单元格H 是小时 单元格I是分 比如输入时间 2 40 自动变换 4 10 就是说我直接在H 2 I 40 以后自动 H变4 I变10 如何设置谢谢！~
可以用vba在原位置修改。但是不建议这么做。
规范的方法是在其他列得到你要的时间值。
如果一定要在原位置上更新的话，可以试试如下步骤：
1、在工作表标签上单击鼠标右键，选择“查看代码”；
2、删除原有的所有代码，并粘贴下面代码：
Private fUpdating As Boolean
Private Sub Worksheet_Change(ByVal Target As Range)
If fUpdating Then Exit Sub Else fUpdating = True
If Left(Target.Address, 2) = "$H" Then
Target.Value = Target.Value + 1
ElseIf Left(Target.Address, 2) = "$I" Then
nMinutes = Target.Value + 30
If nMinutes >= 60 Then
Target.Value = nMinutes Mod 60
Target.Previous.Value = Target.Previous.Value + Int(nMinutes / 60)
End If
End If
fUpdating = False
End Sub
3、键入ALT+Q退出VBA编辑器返回Excel主窗口，试试看在H和I里面输入数据是否正确更新。