Edsonnp

Olá estou com um problema de lógica num código VBA, eu preciso que ele selecione uma planilha (segunda planilha) e encontre os valores e me mostre nas caixas, para que eu possa altera-los ou exclui-los, só que o problema é o seguinte, quando estou com a janela do Excel e a janela de códigos abertas e clico pra rodar e faço o teste ele seleciona tudo correto me mostra os valores corretamente, faço a debugação do código e tudo funciona corretamente, porém quando eu fecho o Excel e abro somente a aplicação e executo a ação em vez de ele escolher a planilha programada ele seleciona a primeira planilha e mostra os dados dela em vez de mostrar os da que está programada no código. segue meu código que utilizei: Private Sub Combo_dadosfunc_nome_Click() totalfunc = Worksheets("Funcionários").UsedRange.Row.Count For i = 0 To totalfunc If Combo_dadosfunc_nome.ListIndex = i Then 'PREENCHER CAIXAS caixa_dadosfunc_nascimento = Cells(i + 2, 2) caixa_dadosfunc_telefone = Cells(i + 2, 3) caixa_dadosfunc_email = Cells(i + 2, 4) caixa_dadosfunc_funcao = Cells(i + 2, 5) caixa_dadosfunc_num_calcado = Cells(i + 2, 6) caixa_dadosfunc_tam_uniforme = Cells(i + 2, 7) caixa_dadosfunc_matricula = Cells(i + 2, 8) Exit Sub End If Next 'COMANDO PARA SALVAR AUTOMATICAMENTE ActiveWorkbook.Save Alguem pode me dizer onde está o meu erro?