VBA to Move Row in a Sheet Based on Cell Value

[samjbeattie]

Looking for some help.

Found a few VBA codes online and tried to modify them to function correctly in my workbook, but I just can't seem to make them work?

I need it to do the following:


Sheet 2 is named 'TSP Milestone Tracker' and contains the main data.

The main data is in cells B5:J10 with the headings on said data in B4:J4

Cells B5:B10 contains the status of each line

I want the VBA to do the following: If for example the data in cell B5 reads 'Complete', the entire line (B5:J5) is to be moved to another sheet named 'TSP Milestone Value' in the B5:J5 location

Each subsequent line of data marked 'complete' needs to then move to the next available line on the 'TSP Milestone Value' sheet.


Hopefully this makes sense? I can send the file over if needed.

Thanks in advance.


Edit: Sample file now attached.

[torachan]

See big yellow banner at head of page - how to send a workbook

[samjbeattie]

Apologies, sample file now attached.

[Mumps1]

Copy and paste this macro into the worksheet code module. Do the following: right click the tab name for your sheet "TSP Milestone Tracker" and click 'View Code'. Paste the macro into the empty code window that opens up. Close the code window to return to your sheet. Enter your data starting in column C to column J and then lastly, make a selection in column B. It is important that column B is populated after columns C to J.

Please Login or Register  to view this content.

[samjbeattie]

This is almost working.

However, if the selection in B5:B10 is 'Complete' I'd like the line to move to the 'TSP Milestone Value' sheet, not just copy.

Also if possible, the lines below then all move up to fill the gap?

Are you able to make this change?

Thank you.

[Mumps1]

Try:

Please Login or Register  to view this content.

[samjbeattie]

Perfect, thank you!

[Mumps1]

My pleasure.