Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 34
Default Move to next unprotected cell automatically after entering data

I have a protected worksheet. I enter a single digit of data into
unprotected cells. I want the cursor to automatically move to the next
unprotected cell after I input the single digit, without the need to use the
TAB or ENTER key.
Does anyone have a solution?
Patrick Riley
  #2   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 22,906
Default Move to next unprotected cell automatically after entering data

Patrick

Excel has no way of knowing when you have completed data entry in a cell without
some sort of trigger like Tab, ENTER or Arrow key to move out of the cell.

No code can run while you are in Edit mode so VBA is out.


Gord Dibben MS Excel MVP

On Mon, 2 Apr 2007 13:20:00 -0700, Patrick Riley
wrote:

I have a protected worksheet. I enter a single digit of data into
unprotected cells. I want the cursor to automatically move to the next
unprotected cell after I input the single digit, without the need to use the
TAB or ENTER key.
Does anyone have a solution?
Patrick Riley


  #3   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 35,218
Default Move to next unprotected cell automatically after entering data

Without knowing what "the next unprotected cell" means...

Saved from a previous post:

I would turn
tools|options|edit tab|move selection after enter
to down or right or ...

Then turn number lock on and use the numeric keypad to type your digit

Hitting the enter key on the numeric keypad doesn't seem too bad to me.

Another alternative is to create a tiny userform that just looks for a digit:

Put a single textbox on it (use the X button to close the userform).

Put this code in a General module:

Option Explicit
Sub testme01()
Cells(ActiveCell.Row, 1).Activate
UserForm1.Show
End Sub

Add this code to the userform module:

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

Select Case KeyAscii
Case 48-57 'Numbers 0-9
With ActiveCell
.Value = Chr(KeyAscii)
'A:E, then down a row
if activecell.column = 5 then
activecell.entirerow.cells(1).offset(1,0).activate
else
.Offset(0, 1).Activate
end if
End With
End Select
KeyAscii = 0
TextBox1.Value = ""

End Sub

This code goes from A:E then next row, column A.

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

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

Patrick Riley wrote:

I have a protected worksheet. I enter a single digit of data into
unprotected cells. I want the cursor to automatically move to the next
unprotected cell after I input the single digit, without the need to use the
TAB or ENTER key.
Does anyone have a solution?
Patrick Riley


--

Dave Peterson
Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Move cell data to another worksheet cell automatically. Alan New Users to Excel 3 April 6th 08 08:05 PM
How to enter data then move automatically to new cell? Wibs Excel Discussion (Misc queries) 7 December 19th 05 01:22 AM
move cusor to the next unprotected cell RS Excel Worksheet Functions 2 November 28th 05 04:47 PM
How to move to next cell by entering data-not using Enter key. johnexcel Excel Discussion (Misc queries) 3 August 26th 05 05:20 AM
How to move to next cell by entering data-not using Enter key. johnexcel New Users to Excel 2 August 25th 05 02:42 PM


All times are GMT +1. The time now is 11:33 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"