#1   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 9
Default 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   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 8,520
Default 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   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 9
Default 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
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
How to input pictures automatically based on cell input? bsharp Excel Worksheet Functions 9 May 30th 09 07:16 AM
I want excel to input data in a cell from multiple cell choices Pam Excel Worksheet Functions 7 March 11th 09 07:52 PM
Input dollar amount into a cell that updates another cell and more Bill Excel Worksheet Functions 7 October 12th 08 10:35 PM
run macro with input msg based on cell input Janelle S Excel Discussion (Misc queries) 0 January 20th 08 05:23 AM
Have user input converted to uppercase in same cell as input? Shannonn New Users to Excel 1 June 20th 06 03:19 AM


All times are GMT +1. The time now is 10:02 PM.

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

About Us

"It's about Microsoft Excel"