Home |
Search |
Today's Posts |
#5
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Hi,
I am not the most elegant macro writer, but try this code. Sub ResetWeek() A = 1 Do Until Cells(A, 1) = "" A = A + 1 Loop Range(Cells(A - 7, 1), Cells(A - 1, 255)).Copy _ Range(Cells(A, 1), Cells(A + 6, 255)) End Sub Regards - Dave. |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Writing Macro in Excel 07 | Excel Worksheet Functions | |||
Help Writing A Macro in Excel | Excel Programming | |||
Writing macro in Excel | Excel Worksheet Functions | |||
Writing Excel Macro | Excel Worksheet Functions | |||
writing Macro in Excel | Excel Programming |