我有一个电子表格,每天都需要输入数据
我想要的是,当数据输入到 A1 中时,当前日期会输入到 G1 中。
并且每天当数据添加到 A 列中的任何单元格时,G 列中相应的单元格将添加日期
答案1
试试这个代码:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then'Enter content in Column A
If Target = "" Then
Target.Offset(0, 6) = ""
Else
Target.Offset(0, 6) = Format(Now, "yyyy-mm-dd")'Record date in Column G
End If
End If
End Sub