I cant get this to work, could someone help me?

Equity = ActiveCell.Value
Cells.Find(What:=Country, After:=Range("Equity"), LookAt:=xlWhole).Activate



Thanks in advance