Update or Refresh each time a change is made

[Richard]

I need only the unique records to show on sheet2. Is there
a way to update or refresh each time a change is made. If
so how would you write the formula in the Worksheet_Change
Data-Filter-Advanced Filter-List Range:Sheet2!$A:$A-unique
records only.

 

[Don Guillett]

Here is one I did for a client recently.

With Sheets("yoursheenamehere")
..Range("yourrangenamehere").AdvancedFilter Action:=xlFilterInPlace,
Unique:=True
..Range("yourrangenamehere").SpecialCells(xlCellTypeVisible).Copy
Sheets("destinationsheet").Range("b28").PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
If .FilterMode = True Then .ShowAllData
'.Rows(4).Hidden = True
End With