excel - In Excel, is there any way to quickly advance a time cell by one minute?

Question

For example, let's say Cell A1 has a value of 11:37:00 PM (displayed as 23:37). I want to click the cell and immediately advance it to 11:38:00 PM (displayed as 23:38). It's annoying to have to delete and type the new time value into the area on top .

Answer 1

これにより、列 A の任意のセルをクリックして 1 分追加できます。議事録を追加するシートにこのサブを追加します。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Column = 1 Then 'edit this to change a different column
        Cells(Target.Row, Target.Column).Value = Cells(Target.Row, Target.Column) + TimeValue("00:01:00")
    End If
End Sub

追加

日付があり、日付を更新したくない場合は、これを使用してください。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Column = 1 Then 'edit this to change a different column
        var = DateValue(Cells(Target.Row, Target.Column).Value)
        Cells(Target.Row, Target.Column).Value = Cells(Target.Row, Target.Column) + TimeValue("00:01:00")
        var2 = DateValue(Cells(Target.Row, Target.Column).Value)
        If var <> var2 Then
            Cells(Target.Row, Target.Column).Value = Cells(Target.Row, Target.Column).Value - 1
        End If
    End If
End Sub