Try this code
Right click on the Dashboard sheet and select View Code. Copy this code over. Each time you type "Closed" in column A, it will move the row.![]()
Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Columns("A:A")) Is Nothing Then If Range("A" & Target.Row).Value = "Closed" Then Target.EntireRow.Copy Worksheets("Completed").Range("A" & Rows.Count).End(xlUp).Offset(1, 0) Target.EntireRow.Delete End If End If End Sub
Bookmarks