Macro to copy and paste rows based on "text" found in Column A

**balston2** · 01-09-2013, 11:37 AM

I am using the code below to copy data from a sheet named Unix and paste it into a sheet named Demonstration. Currently it is copying the data between
EO27:HT95. I need to be able to use this macro when rows are added or deleted, therefore

I would like it to be able to search the file and begin copying the data when it finds the term "CRS" in column A and continuing copying all rows until it reaches the term "Other" in column A.

Please Please help. I have tried so many different codes and tried asking this so many times. Any help would be greatly appreciated.

Thank you!

Please Login or Register  to view this content.

**tigeravatar** · 01-09-2013, 11:47 AM

balston2,

So you want to copy all rows in sheet 'Unix' where column A = "CRS" to sheet 'Demonstration', is that correct?
If so, this should work for you:

Please Login or Register  to view this content.

**balston2** · 01-09-2013, 11:50 AM

Almost. I want it to start copying the rows once it finds the first "CRS" and continue copying all rows after even if CRS is not in column A. I then need it to stop copying the rows once it gets to "Other" in Column A.
Thanks for you quick responce!

**Fettertiger** · 01-09-2013, 12:10 PM

Hi Bolston,

unfortunately I am sitting in front of a public computer which does not have excel installed. I hope I did not accidentally mess up the syntax.

I made some small changes to the macro which should do the trick. In general i prefer not to "activate" sheets to much, but addressing them directly with

Set XS = Sheets("Unix") 'Source
Set XT =Sheets("Demonstration") 'target

Thererfore I have replaced the "activesheet" with either XS or XT. Furthermore I got rid of all those selects

Please Login or Register  to view this content.

Hope it works

Theo

**balston2** · 01-09-2013, 12:20 PM

Thanks so much for your responce! I'm trying the code but nothing is happening. I am trying to go through it and find out why.

**balston2** · 01-09-2013, 12:35 PM

Ok so now the macro is working but not starting the copying at CRS or stoping at other. It just begins copying at E049 and stops at HT117. starting in column EO is perfect that was actually going to be my next question.

But I need it to start copying in the row that begins with CRS.