If job not completed carries over to the following days

[Sweetlidelangel]

Is there a way for a row to keep carrying over to the following worksheets based on a couple of different cells and also stop based on a different cell value?

 

[dermie_72]

There is, I believe it would need to be in VBA to do this though. Without seeing any of your data it's extremely hard to provide any output. Im not sure how the sheet naming convention works where the headings are or where the Specific cells are that need to be flagged when completed. Lets assume that the flag is in Column O and it a N.

Sub Sweetlidelangel()


    LR = Cells(Rows.Count, "A").End(xlUp).Row           'Assuming you have data in Column A.   Change the "A" to whichever column has data
    ActiveSheet.Range("$A$1:$O$" & LR).AutoFilter Field:=15, Criteria1:="N" 'Assuming you'reusing "N" as incomplete.   Change it to "" if it's blank.
    Range("A1:O" & LR).SpecialCells(xlCellTypeVisible).Select
    Selection.Copy
    Sheets.Add After:=ActiveSheet
    ActiveSheet.Paste

End Sub

 

[Sweetlidelangel]

There is, I believe it would need to be in VBA to do this though. Without seeing any of your data it's extremely hard to provide any output. Im not sure how the sheet naming convention works where the headings are or where the Specific cells are that need to be flagged when completed. Lets assume that the flag is in Column O and it a N.

Sub Sweetlidelangel()


    LR = Cells(Rows.Count, "A").End(xlUp).Row           'Assuming you have data in Column A.   Change the "A" to whichever column has data
    ActiveSheet.Range("$A$1:$O$" & LR).AutoFilter Field:=15, Criteria1:="N" 'Assuming you'reusing "N" as incomplete.   Change it to "" if it's blank.
    Range("A1:O" & LR).SpecialCells(xlCellTypeVisible).Select
    Selection.Copy
    Sheets.Add After:=ActiveSheet
    ActiveSheet.Paste

End Sub

Does the below help explain the first step i am trying to do?