Home |
Search |
Today's Posts |
#4
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Works just as I had hoped!
Much appreciated Gary. "Gary''s Student" wrote: Sub move_it() Dim ws As Worksheet Set ws = Sheets(Range("A1").Value) s = Array("B1", "Z1") For i = LBound(s) To UBound(s) ws.Range(s(i)).Copy Sheets("Data temp").Range(s(i)) Next End Sub Note that s is a string array that the contains the disjoint range to be copied. -- Gary''s Student - gsnu200722 |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Copy & paste cells fr open worksheet then close the worksheet | Excel Programming | |||
Unable to Insert Worksheet/Move and copy worksheet Excel 2003 | Excel Worksheet Functions | |||
copy range on every worksheet (diff names) to a master worksheet (to be created) | Excel Programming | |||
copy range on every worksheet (diff names) to a master worksheet (to be created) | Excel Programming | |||
Code to copy range vs Copy Entire Worksheet - can't figure it out | Excel Programming |