VBA Copy Rows to another worksheet

[Nonprof]

Hello friends,

I have been working on this code, but am having trouble finishing it up.
It works well now, but I still need a few things.

1. I want the code to run automatically whenever column N has is edited on the source sheet "all positions".
2. This is to include addition OR deletion of numbers to cells in the "N" (N2 down, as I have headers) column.
3. I want it to automatically overwrite all data on the "open positions" tab each time.
4. As more than one position may be available for each row, I want the code to be modified so that it will copy the rows to the other tab when "ANY" number is entered into cells in the "N" column.

Sub Copyx()Dim RngColF As Range
Dim i As Range
Dim Dest As Range
Sheets("all positions").Select
Set RngColF = Range("N2", Range("N" & Rows.Count).End(xlUp))
With Sheets("positions open")
Set Dest = .Range("A2")
End With
For Each i In RngColF
If i.Value = "1" Then
i.EntireRow.Copy Dest
Set Dest = Dest.Offset(1)
End If
Next i
End Sub

 

[Joe4]

Welcome to the Board!

You can use the Worksheet_Change event procedure to automatically run when a cell in column N is manually updated.
Here is an article which discusses that: http://www.ozgrid.com/VBA/run-macros-change.htm
And here is an article which explains Events in more details: http://www.cpearson.com/excel/events.aspx