Home |
Search |
Today's Posts |
|
#1
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
Amarilla
The following macro will do what you want. I assumed that you wanted this to work with any entry in Column A. You will have to change the code if this assumption is not correct. I also assumed the number of characters you want to keep in the cell is 5 and anything more than that to be put in the cell below. The first line of the macro, the line that starts with "Const", has the number 5 in it. Change that number to the number of characters you want to keep. Note that this macro is a sheet event macro and must be placed in the sheet module of your sheet. To access that module, right-click on the sheet tab, select View Code, and paste this macro into that module. "X" out of the module to return to your sheet. Please post back if this is not clear or you need more help with it. HTH Otto Private Sub Worksheet_Change(ByVal Target As Range) Const TheNum As Long = 5 If Target.Count 1 Then Exit Sub If IsEmpty(Target.Value) Then Exit Sub If Target.Column = 1 Then Application.EnableEvents = False If Len(Target.Value) TheNum Then Target.Offset(1).Value = _ Right(Target.Value, Len(Target.Value) - TheNum) Target.Value = Left(Target.Value, TheNum) End If Application.EnableEvents = True End If End Sub "Amarilla" wrote in message ... Is it possible to set Excel so that after entering a specific number of characters into a cell the cursor will jump to the next cell automaticly? |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Urgent date/scheduling calc needed | Excel Worksheet Functions | |||
Dates of a Day for a month & year cell formulas | Excel Discussion (Misc queries) | |||
copying cell names | Excel Discussion (Misc queries) | |||
cell color index comparison | New Users to Excel | |||
up to 7 functions? | Excel Worksheet Functions |