Using one cell to enter data and move pervious data over

I want to use only one cell to enter data. Once I enter data a second time in the same cell I want the old data to move to the next cell on the right.

Example: I enter 3/12 in colum A cell 1. I click the enter button now it moves 3/12 to column b cell 1. Now I enter 3/19 in column A cell 1 click enter. Now 3/19 goes to column B cell1 and 3/12 moves to column C cell 1.

Hello jalicea,

Welcome to the Forum!

Here is macro that will shift the cells for you after you input a value. The cell I used to test the macro was $A$4, but you can change this before you save the macro to the cell you are using.

Please Login or Register  to view this content.

How to Save a Worksheet Event Macro
1. Copy the macro using CTRL+C keys.
2. Open your Workbook and Right Click on the Worksheet's Name Tab for the Worksheet the macro will run on.
3. Left Click on View Code in the pop up menu.
4. Paste the macro code using CTRL+V
5. Save the macro in your Workbook using CTRL+S

Sincerely,
Leith Ross

Hello Martin,

Whenever writing code for the Worksheet_Change() or Worksheet_SelectionChange() event, it is good idea to use Application.EnableEvents = False before you change the value of a cell in the macro. The act of changing a cell's value while in the event sequence will invoke the event again. This will continue under the stack overflows and VBA errors out. Remember to re-enable events by using Application.EnableEvents = True prior to exiting the event at any time.

Sincerely,
Leith Ross

Originally Posted by Leith Ross

Hello jalicea,

Welcome to the Forum!

Here is macro that will shift the cells for you after you input a value. The cell I used to test the macro was $A$4, but you can change this before you save the macro to the cell you are using.

Please Login or Register  to view this content.

How to Save a Worksheet Event Macro
1. Copy the macro using CTRL+C keys.
2. Open your Workbook and Right Click on the Worksheet's Name Tab for the Worksheet the macro will run on.
3. Left Click on View Code in the pop up menu.
4. Paste the macro code using CTRL+V
5. Save the macro in your Workbook using CTRL+S

Sincerely,
Leith Ross

While I can transfer the code over it is not performing.

I have copied and save the cell is not moving the data over. What I am trying to acomplish is I have several employees and I want to enter the date they work overtime. Then I want to know know many times thay worked overtime. So what I am looking for is:

If I pick column B cell 1 to be where I enter the date they worked overtime and hit enter I want it to move it over to column C cell 1. I want column B cell 1 to be the only place I enter the date. Then they work overtime again I want to enter the date in column B cell 1 what I entered earlier goes to column D cell 1 and the new date goes to column C cell 1. Then I want column A cell 1 to count every time I enter a date in column B cell 1. I need to keep a record of everytime thay work overtime just entering it in one cell but keeping a total and record.

Hello jalicea,

I updated the macro to add the count to cell A1.

Please Login or Register  to view this content.

How to Save a Worksheet Event Macro
1. Copy the macro using CTRL+C keys.
2. Open your Workbook and Right Click on the Worksheet's Name Tab for the Worksheet the macro will run on.
3. Left Click on View Code in the pop up menu.
4. Paste the macro code using CTRL+V
5. Save the macro in your Workbook using CTRL+S

Sincerely,
Leith Ross