Macro to scan column and copy corresponding cell

Hi,

I'm trying to write a macro that scans a column in a worksheet, and if it finds a cell that meets a certain criteria, it pulls a cell from a different column (but the same row) into a different worksheet.

To simplify it:
I need a macro to scan the entire Column C on 'Sheet1' for a cell that has the value '1'. If it finds a cell with this value, it copies the value from the same row in Column A and pastes it in the last active cell in 'Sheet2'. The macro then continues down Column C in 'Sheet1' searching for the next cell with the value '1' to copy the corresponding value in Column A into the next row in 'Sheet2', etc...

If someone could help me with this, it would be much appreciated.
Thanks.

You can apply an AutoFilter to your sheet1 table, filter column C by "1", then copy all the visible column A values all at once to sheet 2. By hand that would take all of... 10 seconds.

Please Login or Register  to view this content.

If that takes care of your need, please click EDIT in your original post, click GO ADVANCED and set the PREFIX box to SOLVED.