trouble with 'cells.find' returning error

Hi,

I am wondering if anyone has a solution to my problem. I am trying to set up a command button in the "FORMS" sheet called "Add new employee" that runs a form and macro to add employees to the "Station Capacity" sheet. I have attached the Excel Spreadsheet that I am working on, but the trouble bit of code that is producing the error is given below.

Cells.find(What:=x, After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate

I would appreciate any help with fixing this.

The funny thing is that when you run the macro "moveest" separately the code works. But when added to the command button "Add new employee" it doesn't.

Thanks so much.
Cheers,
Laura