How do I make the cursor move down 8 cells each time i press enter

[Guest]

I am entering a whole load of data into Excel and need to jump down 8 cells
each time I press enter.

So I start in c2 and need to jump to c10, c18, c26 etc... up to c82

Then I start in c3 and on to c11,c19,c27 etc... then c4,c5 etc

Then I move on to d2 and enter the 89 lines of data jumping down 8 cells
each time.

An then onto e2, f2, g2 etc

Any easy way to just make the cursor move down 8 cells each time i press
enter?

Thanks!

 

[Guest]

You could try these macros. First one instructs XL to run the second macro
every time the enter key is pressed. Second one is what will actually run
when you press enter, and the third one will reset the enter key. You could
assign the first and third to a toolbar button, or you could incorporate them
into the worbook open and close event handlers so they run automatically.
Change "{Return}" to "{Enter}" if you meant the enter key on the numeric
keypad.

Sub ReMapEnterKey()
Application.OnKey "{Return}", "GoDownEight"
End Sub

Sub GoDownEight()
ActiveCell.Offset(8, 0).Activate
End Sub

Sub ResetEnterKey()
Application.OnKey "{Return}"
End Sub

 

[Don Guillett]

Right click sheet tab>view code>insert this. Will change when you enter
something in a cell.

Private Sub Worksheet_Change(ByVal Target As Range)
if target.column<>3 then exit sub
Target.Offset(8).Select
End Sub

 

[Guest]

Fab, that sorted things out! Thank you so much!

Right click sheet tab>view code>insert this. Will change when you enter
something in a cell.

Private Sub Worksheet_Change(ByVal Target As Range)
if target.column<>3 then exit sub
Target.Offset(8).Select
End Sub

--
Don Guillett
Microsoft MVP Excel
SalesAid Software
(e-mail address removed)