Copy a row from one sheet to another and delete from first

[RodneyManning]

I created a workbook for nonconformance's and want to use a VBA to copy a row from one spreadsheet (Service Nonconformance Tracker) to another spreadsheet (CA-PA Tracker) and delete the row from the first spreadsheet. The trigger for this to happen is when a cell in a column has the word "YES" from a dropdown added.

The current VBA code I'm using is deleting the row from the first spreadsheet (Service Nonconformance Tracker) but I can't find where its being pasted after deletion. The VBA code I'm using is as follows:

Please Login or Register  to view this content.

Any help that can be provided would be much appreciated, as this has me stomped.


v/r,
Rodney

Administrator's note: Please take the time to review our rules. There aren't many, and they are all important. Rule #1 requires good titles. "Need help with a VBA" doesn't tell us anything about your question. I have updated it for you this time because you are a new member. --6StringJazzer

[Bernie Deitrick]

It's being put at the bottom of the sheet named CA-PA Tracker - go to that sheet and use Ctrl-End to find the last entry on the sheet. The code you have is poorly written and may be adding the data far down the sheet, so select column S, use GoTo Special Blanks OK and then delete entire rows.

Here some clearer code:

Please Login or Register  to view this content.

[RodneyManning]

Bernie,

First and foremost thank you for responding.

The code you provided does work and the data is at the bottom of the page as you stated. Is there a way to code so that the copied data is entered into the next available row at the top of the spreadsheet (CA-PA Tracker)?

[Bernie Deitrick]

IF - If an available row is defined by not having an entry in column S, then try

Please Login or Register  to view this content.

[sintek]

No need for loops here...can be simplified but no sample file...see yellow banner regarding sample file upload...