Thread: "Auto-return"
View Single Post
  #4  
Old September 11th, 2005, 06:00 PM
Norman Jones
external usenet poster
 
Posts: n/a
Default

Hi Jaytree,

"Jaytee" wrote in message
...
Question 1: If I'm entering rows of data, can I set it up at a certain
column
to return to the start of the next row?
So if I have 4 columns of data, I input in A2, hit enter to get to B2,
then
input and hit enter to get to c2, input and enter to get to d2, input and
enter to get to b3.


If you want a VBA solution, try:

'===================
Private Sub Worksheet_Change(ByVal Target As Range)
Dim RngInput As Range
Dim i As Long

Set RngInput = Range("A150") '========= CHANGE
i = RngInput.Columns.Count

If Target.Cells.Count 1 Then Exit Sub

If Not Intersect(Target, RngInput) Is Nothing Then
If Target.Column = RngInput.Columns(i).Column Then
Target.Offset(1, 1 - i).Select
Else
Target.Offset(0, 1).Select
End If
End If
End Sub
'===================

Change Range("A150") to match the required input range.

This is worksheet event code and should be pasted into the worksheets's code
module (not a standard module and not the workbook's ThisWorkbook module):

************************************************** **********
Right-click the worksheet's tab

Select 'View Code' from the menu and paste the code.

Alt-F11 to return to Excel.
************************************************** **********

If you are not familiar with macros you may wish to visit David McRitchie's
'Getting Started With Macros And User Defined Functions' at:

http://www.mvps.org/dmcritchie/excel/getstarted.htm


---
Regards,
Norman