View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Gary Keramidas Gary Keramidas is offline
external usenet poster
 
Posts: 2,494
Default Copy a complete row

you can five this a try, but i would qualify the ranges with the sheet names

cell.EntireRow.Copy
Range("A" & lastrow).PasteSpecial xlPasteAll

--


Gary Keramidas
Excel 2003


"Fred Smith" wrote in message
...
I have the following code segment:

Set WorkRange = ...
For Each cell in WorkRange
Taxrow = application.match(cell.value, range("A:A"), 0)
if iserror(taxrow) and cell.offset(0,9) < "Inactive" then

Now I want to copy the entire row that "cell" is on to the active worksheet
row "LastRow".

Is there one or two lines of code that would do this?

Thanks,
Fred