Removing duplicate cells ?

Removing duplicate cells ?

Hello,
I did not find a function allowing me to remove duplicate cells.

In Zoho spreadsheet I guess I should do first :
a) rank column A (ascending) :
  1. Sub first()
  2. Sheets("Sheet2").Select
  3. Range("A1:C400").Select
  4. Selection.Sort Key1:=Range("A1:A400"),Order1:=xlAscending,MatchCase:=false,Orientation:=xlTopToBottom
  5.       call kill_duplicate
  6. End sub
This should work ok ;)

b) then adapt in zoho the following that I use in excel :
  1. Sub kill_duplicate()
  2. 'First sort (ascending) the sheet by column A
  3. For i = [A65536].End(xlUp).Row To 2 Step -1
  4. If Range("A" & i).Value = Range("A" & i + 1).Value Then
  5. Rows(i).Delete
  6. End If
  7. Next i
  8. End Sub
Any idea ?

Thanks in advance ;)