Copy columns, remove duplicates and paste different worksheet and column query

Hi

I have simple query for someone with advanced VBA knowledge. I have following macro to paste data in column A of destination sheet. I got it from: "http://www.mrexcel.com/forum/excel-questions/270724-unique-records-5-different-ranges.html"

Sub CopyRemoveduplicatesReportsheet()
EndRow = Sheets("Report").Cells(Rows.Count, "A").End(xlUp).Row + 1
Set TargCell = Sheets("Report").Range("A" & EndRow)
Set FilterRng = Sheets("Security").Range("B:B")
    FilterRng.AdvancedFilter Action:=xlFilterCopy, CopyToRange:=TargCell, Unique:=True
End sub

I would however like to paste data in column C. I have tried to do this by changing the "A" value in second and third row of macro to "C". This seems however not to be sufficient. The macro has no effect. It does not copy and paste the data when I run it. Please note that my knowledge of VBA is very limited. Would appreciate if someone can just give me correct macro code.