vba

Pessoal,to com uma planilha aberta aqui e estou criando uma macro, já fiz uma vez mas esqueci como faz.deem uma olhada no codigo

Private Sub CommandButton1_Click()Dim codigoDim i As Integercodigo = TextBox1.TextFor i = 1 To 20 If Plan1.Cells(i, 0) = codigo Then codigo = Plan1.Cells(i, 1) Label1.Caption = codigo Exit For End If If Plan1.Cells(i, 2) = codigo Then codigo = Plan1.Cells(i, 3) Label1.Caption = codigo Exit For End IfNextEnd SubQuando esta em cima de If Plan1.Cells(i, 0) = codigo Then ele da a mesnagem

Erro em tempo de execução '1004':Erro de definição de aplicativo ou de definição de objeto

Alguma dica ?