How to automatically enter date when data entered in a column?
When working on a worksheet, you want the current date and time entered into a column B automatically when entering data in column A as following screenshot shown. In Excel, how could you try to solve this job with an easy and quick solution?
Maybe, there is no direct way for us to deal with this job in Excel, but, the following VBA code can help you, please do as follows:
1. Select the sheet tab which you want to insert date automatically, then right click it, choose View Code from the text menu, then in eh popped out Microsoft Visual Basic for Applications window, please copy and paste the following code into the Module:
VBA code: Automatically enter date when entering data in another column:
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Cells.Count > 1 Then Exit Sub If Not Intersect(Target, Range("A2:A15")) Is Nothing Then With Target(1, 2) .Value = Date & " " & Time .EntireColumn.AutoFit End With End If End Sub
2. Then save and close this code window, go back to the worksheet, now, when you enter data in Column A, the corresponding cell in Column B will enter the current date and time automatically at once.
Note: In the above code, A2:A15 is the cells that you want to enter values.
You are guest
or post as a guest, but your post won't be published automatically.
- To post as a guest, your comment is unpublished.· 2 months agoHi i was wondering if there was any way to make it input the date in the column before the data, like if i type in B the date appears in A, also more importantly, if there was any way to apply the code to multiple columns at once