Copy Data from Sheet One to Next available row on Sheet Two based on Indicator "Complete"

[Jlopez21887]

Afternoon All!!!!

Brand new to the forum. As they say on the Radio "Long time listener, first time caller"

I am trying to incorporate a new idea into an existing workbook to cut down on some manual work time using a macro. I created a basic one, but it is not to where I need it, and I've found myself stuck for a few hours now.

I have data on Sheet 1 (School Schedule) in Cells A-N. Cell N is going to be the key indicator in which it indicates if the row is going to be copied to the next available Sheet with the word "Complete"

The sheet it will have to be pasted to is called "Data". This sheet already exists and currently has 300+ rows of data that have been manually entered. I want the data to be copied to the next available row

Here are the kickers.

This School schedule sheet be continually filled out with new data weekly/monthly. I would like it to ignore the rows it has already copied over (Might be easiest just to add to the drop down list in cell N with another indicator for personal use)

I only need to copy the first say 6-7 (A-G) columns for each row and post it to the new sheet in (I-O)

Summary
Sheet that has data to be copied: School Schedule
Sheet that needs to have data pasted: Data
Key Indicator: Complete
Cells need to be copied: A-G
Cells that need to be pasted into: I-O
Data will continually be updated on School Schedule and I would like to ignore those that are already copied over.


Here is my current Macro

Sub Stats()

Application.ScreenUpdating = False

Dim NextRow As Range
Set NextRow = Sheets("Data").Cells(Cells.Rows.Count, 1).End(xlUp).Offset(1, 0)
Sheets("School_Schedule").Range("A2:G26").Copy
NextRow.PasteSpecial (xlValues)


Application.CutCopyMode = False
Application.ScreenUpdating = True
End Sub

Thank you in advance for any help!!!