Nem sempre é fácil pedir para o usuário final criar uma pasta, pois acreditem se quiser, tem gente com dificuldade para realizar essa tarefa...
Abaixo um código para verificar se a pasta existe e se não existir, cria em seguida.
Sub pasta_existe()
'Verificar se existe
If Dir("C:\TESTE\") = vbNullString Then
'Se não existir, criar
MkDir "C:\TESTE"
End If
End Sub

Nenhum comentário:
Postar um comentário