Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
VBA edit
I received this code from Don Guillett:
Sub copyalltotheirsheets() For Each c In Range("a2:a" & Cells(Rows.Count, "a").End(xlUp).Row) With Sheets(CStr(c)) ..Rows(2).Insert c.Resize(, 2).Copy .Range("a2") End With Next c End Sub Currently this copies the data in row A and B. How could I include the data in column C? Thanks, |
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
VBA edit
You could have looked at RESIZE in the help index
c.Resize(, 3).Copy .Range("a2") -- Don Guillett Microsoft MVP Excel SalesAid Software "Benjamin" wrote in message ... I received this code from Don Guillett: Sub copyalltotheirsheets() For Each c In Range("a2:a" & Cells(Rows.Count, "a").End(xlUp).Row) With Sheets(CStr(c)) .Rows(2).Insert c.Resize(, 2).Copy .Range("a2") End With Next c End Sub Currently this copies the data in row A and B. How could I include the data in column C? Thanks, |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Edit? | Excel Discussion (Misc queries) | |||
F2 Edit Key | Excel Worksheet Functions | |||
F2 Edit Key | Excel Worksheet Functions | |||
fx-edit | New Users to Excel | |||
Why can't I edit my excel document? Edit buttons shaded. | New Users to Excel |