Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
Cell Input
I am trying to input a number in Cell B -1 that will then appear in Cell
D-1 , and when there is a new entry in Cell B-1 , Cell D-1 will accept the new entry from Cell B-1 and the old input will drop from Cell D-1 to Cell D-2 and so on all the way to Cell D-31 . Is it possible to do this ? thank you |
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
Cell Input
This can be done using the worksheet change event. Right click the sheet
tab View code and paste the below code..Try entering values in B1.. Private Sub Worksheet_Change(ByVal Target As Range) Application.EnableEvents = False If Not Application.Intersect(Target, Range("B1")) Is Nothing Then If Target.Count = 1 And Target.Value < "" Then varData = Range("D1:D30") Range("D2:D31") = varData Range("D1") = Target.Value End If End If Application.EnableEvents = True End Sub If this post helps click Yes --------------- Jacob Skaria "fello" wrote: I am trying to input a number in Cell B -1 that will then appear in Cell D-1 , and when there is a new entry in Cell B-1 , Cell D-1 will accept the new entry from Cell B-1 and the old input will drop from Cell D-1 to Cell D-2 and so on all the way to Cell D-31 . Is it possible to do this ? thank you |
#3
Posted to microsoft.public.excel.misc
|
|||
|
|||
Cell Input
Thanks Jacob
your knowledge and experience is appreciated "Jacob Skaria" wrote: This can be done using the worksheet change event. Right click the sheet tab View code and paste the below code..Try entering values in B1.. Private Sub Worksheet_Change(ByVal Target As Range) Application.EnableEvents = False If Not Application.Intersect(Target, Range("B1")) Is Nothing Then If Target.Count = 1 And Target.Value < "" Then varData = Range("D1:D30") Range("D2:D31") = varData Range("D1") = Target.Value End If End If Application.EnableEvents = True End Sub If this post helps click Yes --------------- Jacob Skaria "fello" wrote: I am trying to input a number in Cell B -1 that will then appear in Cell D-1 , and when there is a new entry in Cell B-1 , Cell D-1 will accept the new entry from Cell B-1 and the old input will drop from Cell D-1 to Cell D-2 and so on all the way to Cell D-31 . Is it possible to do this ? thank you |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
How to input pictures automatically based on cell input? | Excel Worksheet Functions | |||
I want excel to input data in a cell from multiple cell choices | Excel Worksheet Functions | |||
Input dollar amount into a cell that updates another cell and more | Excel Worksheet Functions | |||
run macro with input msg based on cell input | Excel Discussion (Misc queries) | |||
Have user input converted to uppercase in same cell as input? | New Users to Excel |