Home |
Search |
Today's Posts |
|
#1
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
I need for a range to move down the column 30 cells automatically at the
beginning of every day. Is that possible? -- David P. |
#2
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
try this idea to check the date in a1 and insert days required to bring up
to date & change date stored in a1 Sub insert30rows() If Date < Range("a1") Then x = (Date - Range("a1")) * 30 Rows("9:" & 8 + x).Insert Range("a1") = Date End If End Sub -- Don Guillett SalesAid Software "David P." wrote in message ... I need for a range to move down the column 30 cells automatically at the beginning of every day. Is that possible? -- David P. |
#3
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
Do I put today's date in A1?
What cell would this example referencing to copy and / or move? My other question is, this macro won't be inserting rows will it? Thank you for your assistance. David P. "Don Guillett" wrote: try this idea to check the date in a1 and insert days required to bring up to date & change date stored in a1 Sub insert30rows() If Date < Range("a1") Then x = (Date - Range("a1")) * 30 Rows("9:" & 8 + x).Insert Range("a1") = Date End If End Sub -- Don Guillett SalesAid Software "David P." wrote in message ... I need for a range to move down the column 30 cells automatically at the beginning of every day. Is that possible? -- David P. |
#5
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
Sorry, move down in the sense that the contents of A2:B2 would copy or move
to A32:B32 for example but not insert rows. Thanks. -- David P. "Don Guillett" wrote: Yes, at the start, put the date in a1.. I understood "move down the column" to insert rows. What, EXACTLY to you want? -- Don Guillett SalesAid Software "David P." wrote in message ... Do I put today's date in A1? What cell would this example referencing to copy and / or move? My other question is, this macro won't be inserting rows will it? Thank you for your assistance. David P. "Don Guillett" wrote: try this idea to check the date in a1 and insert days required to bring up to date & change date stored in a1 Sub insert30rows() If Date < Range("a1") Then x = (Date - Range("a1")) * 30 Rows("9:" & 8 + x).Insert Range("a1") = Date End If End Sub -- Don Guillett SalesAid Software "David P." wrote in message ... I need for a range to move down the column 30 cells automatically at the beginning of every day. Is that possible? -- David P. |
#6
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
OK. Which is it, copy or move???
AND, is that 30 c/m a2:b2 to a32:b32 tomorrow where the next day?? Always nice to fully explain what you want the FIRST time. Saves everyone a lot of "tooth pulling" and mind reading. -- Don Guillett SalesAid Software "David P." wrote in message ... Sorry, move down in the sense that the contents of A2:B2 would copy or move to A32:B32 for example but not insert rows. Thanks. -- David P. "Don Guillett" wrote: Yes, at the start, put the date in a1.. I understood "move down the column" to insert rows. What, EXACTLY to you want? -- Don Guillett SalesAid Software "David P." wrote in message ... Do I put today's date in A1? What cell would this example referencing to copy and / or move? My other question is, this macro won't be inserting rows will it? Thank you for your assistance. David P. "Don Guillett" wrote: try this idea to check the date in a1 and insert days required to bring up to date & change date stored in a1 Sub insert30rows() If Date < Range("a1") Then x = (Date - Range("a1")) * 30 Rows("9:" & 8 + x).Insert Range("a1") = Date End If End Sub -- Don Guillett SalesAid Software "David P." wrote in message ... I need for a range to move down the column 30 cells automatically at the beginning of every day. Is that possible? -- David P. |
#7
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
Did you give up on me?
-- David P. "David P." wrote: Sorry, move down in the sense that the contents of A2:B2 would copy or move to A32:B32 for example but not insert rows. Thanks. -- David P. "Don Guillett" wrote: Yes, at the start, put the date in a1.. I understood "move down the column" to insert rows. What, EXACTLY to you want? -- Don Guillett SalesAid Software "David P." wrote in message ... Do I put today's date in A1? What cell would this example referencing to copy and / or move? My other question is, this macro won't be inserting rows will it? Thank you for your assistance. David P. "Don Guillett" wrote: try this idea to check the date in a1 and insert days required to bring up to date & change date stored in a1 Sub insert30rows() If Date < Range("a1") Then x = (Date - Range("a1")) * 30 Rows("9:" & 8 + x).Insert Range("a1") = Date End If End Sub -- Don Guillett SalesAid Software "David P." wrote in message ... I need for a range to move down the column 30 cells automatically at the beginning of every day. Is that possible? -- David P. |
#8
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
Sub godown30rows()
If Date < Range("a1") Then x = (Date - Range("a1")) * 30 'Rows("9:" & 8 + x).Insert Cells(1 + x, "a").Select Range("a1") = Date End If End Sub -- Don Guillett SalesAid Software "David P." wrote in message ... Do I put today's date in A1? What cell would this example referencing to copy and / or move? My other question is, this macro won't be inserting rows will it? Thank you for your assistance. David P. "Don Guillett" wrote: try this idea to check the date in a1 and insert days required to bring up to date & change date stored in a1 Sub insert30rows() If Date < Range("a1") Then x = (Date - Range("a1")) * 30 Rows("9:" & 8 + x).Insert Range("a1") = Date End If End Sub -- Don Guillett SalesAid Software "David P." wrote in message ... I need for a range to move down the column 30 cells automatically at the beginning of every day. Is that possible? -- David P. |
#9
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
Hi Don,
I tried the example but nothing appears to happen. Do I need to customize it in any way. Currently I have the date in A1 and some text in A2:B:2 that would move to A32:B32 for example. -- David P. "Don Guillett" wrote: Sub godown30rows() If Date < Range("a1") Then x = (Date - Range("a1")) * 30 'Rows("9:" & 8 + x).Insert Cells(1 + x, "a").Select Range("a1") = Date End If End Sub -- Don Guillett SalesAid Software "David P." wrote in message ... Do I put today's date in A1? What cell would this example referencing to copy and / or move? My other question is, this macro won't be inserting rows will it? Thank you for your assistance. David P. "Don Guillett" wrote: try this idea to check the date in a1 and insert days required to bring up to date & change date stored in a1 Sub insert30rows() If Date < Range("a1") Then x = (Date - Range("a1")) * 30 Rows("9:" & 8 + x).Insert Range("a1") = Date End If End Sub -- Don Guillett SalesAid Software "David P." wrote in message ... I need for a range to move down the column 30 cells automatically at the beginning of every day. Is that possible? -- David P. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
compare the contents of one range of cells with the contents of a. | Excel Discussion (Misc queries) | |||
move cell contents | Excel Discussion (Misc queries) | |||
Macro to remove contents of cell and move all other contents up one row | Excel Discussion (Misc queries) | |||
When I move scroll bar in excell the contents do not move with it | Excel Discussion (Misc queries) | |||
How to move cell contents | Excel Discussion (Misc queries) |