If Target.Column = 2 Then Target.Offset(0, 1) = Date ![]() If your request is "in column B ( 2nd column) after you enter (insert) the data in column C (B 1th column to the right of the column) to automatically enter a date", the middle line of code should be replaced with: The middle line is the core code, means: 1th column (column A) input data, the 2nd on the right column (column C) enter (insert) a date. If Target.Column = 1 Then Target.Offset(0, 2) = Date Private Sub Worksheet_Change( ByVal Target As Range) VBA is easy, Right click on the sheet tab, select the "view code" and copy and paste the following code at the cursor: In order to alleviate the burden of input, we sometimes want Excel to automatically enter (insert) the current date in cells. Useful Resources Automatically Enter (Insert) the Current Date in Excel (Cells)ĭate is a very important piece of information in the record. Automatically Enter (Insert) the Current Date in Excel
0 Comments
Leave a Reply. |