Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
paste issue
i would like to copy one list in a worksheet A to worksheet B but sheet B has
title rows of data starting in row 2 which cant be overwritten. If column A has data in itit needs to paste below it. worksheet A is a list with no breaks. so if sheet B has data, 7row breaks, data, 3 row break... it needs to sopy the first 7 (of sheet A) of the list starting to paste at row 2 in sheet B, then recognise the gap required and paste the next 3 below it (row 10). any help? cheers. |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
paste issue
set ShtA = sheets("Sheet1")
set ShtB = sheets("Sheet2") 'start at A1 and look down until last data cell is found LastRow = ShtA.Range("A1").end(xldown).Row Set CopyRows = Rows("1:" & LastRow) 'go to last row of worksheet and move up until data is found LastRow = ShtB.Range("A" & Rows.Count).end(xlup).Row NewRow = LastRow + 3 CopyRows.Copy _ Destination:=ShtB.Rows(NewRow) "project manager" wrote: i would like to copy one list in a worksheet A to worksheet B but sheet B has title rows of data starting in row 2 which cant be overwritten. If column A has data in itit needs to paste below it. worksheet A is a list with no breaks. so if sheet B has data, 7row breaks, data, 3 row break... it needs to sopy the first 7 (of sheet A) of the list starting to paste at row 2 in sheet B, then recognise the gap required and paste the next 3 below it (row 10). any help? cheers. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Date Cut & Paste Issue | Excel Discussion (Misc queries) | |||
Paste issue | Excel Discussion (Misc queries) | |||
Copy & Paste Issue | Excel Discussion (Misc queries) | |||
Copy Paste issue | Excel Worksheet Functions | |||
Simple Paste Issue | Excel Programming |