Solucionado
Quando cancelamos a janela onde escolhemos o arquivo a ser importado, o Excel mostra o erro 1004 "Não foi possível encontrar Falso.xlsx. É possível que ele tenha sido movido, renomeado ou excluído?"
Tentei um IF com retorno False para sair da sub, funciona se clicar em cancelar, mas se escolher um arquivo retorna que são tipos incompatíveis.
Como fazer a sub encerrar caso o usuário desista de importar um arquivo e clique em cancelar?
O Thiago tudo bem?
Não sei como está fazendo mas costumo fazer assim:
Sub Exemplo()
Dim intChoice As Integer
Dim strPath As String
'permite apenas o usuário selecionar um arquivo
Application.FileDialog(msoFileDialogOpen).AllowMultiSelect = False
'faz a caixa de diálogo ficar visivel ao usuário
intChoice = Application.FileDialog(msoFileDialogOpen).Show
'determina que escolha o usuáro fez
If intChoice <> 0 Then
'pega o caminho do arquivo selecionado pelo usuário
strPath = Application.FileDialog( _
msoFileDialogOpen).SelectedItems(1)
'escreve o arquivo no excel
Cells(2, 1) = strPath
End If
End Sub
Espero ter ajudado !!!
Agradecido André!!! O meu erro foi ter usado apenas uma variável pra verificar se houve escolha de arquivo e capturar o caminho...
Disponha e bons estudos!!!