Lucas Mateus Gonçalves

Agora ele consegue prosseguir mas não executa a operação "Workbooks.Open Filename:="C:\planilha atualizada\19112018.xlsm"" na hora de depurar o código ele pula esta operação.

Boa tarde. Sou novo em programação estou tentando fazer um projeto para um trabalho Estou criando uma macro para abrir uma outra planilha no Excel sendo o que a planilha fica em meu diretório e ela é atualizada toda segunda feira quando ela e atualizada o nome muda gostaria de deixar automático para não precisar ficar alterando o nome toda segunda. O que consegui fazer esta abaixo mas quando ele não encontra a 1 não prossegue com a depuração da um erro de arquivo não localizado e não continua. ______________________________________________________________________________ Sub Main() Application.DisplayAlerts = False If retval = xlsm Then ChDir "C:\planilha atualizada" Workbooks.Open Filename:="C:\planilha atualizada\19112018.xlsm" ElseIf retval = xlsm Then ChDir "C:\planilha atualizada" Workbooks.Open Filename:="C:\planilha atualizada\12112018.xlsm" End If End Sub ______________________________________________________________________________