Excel 2013: отметка времени / даты при изменении значения ячейки

Question

Я использую Excel 2013 на ПК под управлением Windows 7. В Excel, если ячейка A1 изменится с одного значения на другое, я бы хотел, чтобы отметка даты отображалась в ячейке B1. Предположим, что ячейка A1 может быть пустой или заполненной во время изменения. Кроме того, предположим, что я хочу, чтобы отметка даты происходила автоматически в момент изменения А1. Можете ли вы помочь? Спасибо. VBA или формула в порядке. Благодарю.

Answer 1

Добавьте следующую подгруппу событий на лист, который вы хотите обновить:

Private Sub Worksheet_Change(ByVal Target As Range)
    If (Target = Range("A1")) Then
        Range("B1").Value = Format(Now(), "yyyy-MM-dd hh:mm:ss")
    End If
End Sub

Конечно, это влияет только на ячейку A1. Если вы хотите, чтобы все ячейки в A обновляли соответствующий столбец B, используйте следующее:

Private Sub Worksheet_Change(ByVal Target As Range)
    If (Target.Column = 1) Then
        Cells(Target.Row, 2).Value = Format(Now(), "yyyy-MM-dd hh:mm:ss")
    End If
End Sub

Естественно, вы можете изменить выход ячейки, как вам нужно.