software

I am trying to set up a number of cell that I can input a single digit and
have the cursor move to the next cell.
--
Mike C

huh?

quot;Mike Cquot; gt; wrote in message
...
gt;I am trying to set up a number of cell that I can input a single digit and
gt; have the cursor move to the next cell.
gt; --
gt; Mike C

In Excel 2002 try

Tools gt; Options gt; Edit gt; Move Selection After Enter--
rsenn
------------------------------------------------------------------------
rsenn's Profile: www.excelforum.com/member.php...oamp;userid=29050
View this thread: www.excelforum.com/showthread...hreadid=497260uh, what's does the next cell mean?

To the right until you get to a certain column, then back to column A?
Or down a row?

One way is to build a tiny userform with just a textbox on it.

Add this code to the userform module:

Option Explicit
Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)

Select Case KeyAscii
Case 48 To 57 'Numbers 0-9
With ActiveCell
.Value = Chr(KeyAscii)
If .Column = 3 Then
.Offset(1, -2).Activate
Else
.Offset(0, 1).Activate
End If
End With
End Select
KeyAscii = 0
TextBox1.Value = quot;quot;

End Sub

Then add this to a general module to show the form:
Option Explicit
Sub testme01()
Cells(ActiveCell.Row, 1).Activate
UserForm1.Show
End SubI always start in column A and use A:C.

If you're new to macros, you may want to read David McRitchie's intro at:
www.mvps.org/dmcritchie/excel/getstarted.htm

Debra Dalgleish has some getstarted instructions for userforms at:
contextures.com/xlUserForm01.html

Mike C wrote:
gt;
gt; I am trying to set up a number of cell that I can input a single digit and
gt; have the cursor move to the next cell.
gt; --
gt; Mike C

--

Dave Peterson