O nome do arquivo é retornado como uma String. A função Dir pode ser usada sem os respectivos argumentos para retornar o nome do próximo arquivo, neste mesmo diretório.
O uso mais comum da função Dir é percorrer todos os arquivos de uma pasta, executando uma ação em cada um. Outros usos comuns incluem a verificação da existência destes, saber se um diretório existe, ou procurar um arquivo específico.
O uso mais comum da função Dir é percorrer todos os arquivos de uma pasta, executando uma ação em cada um. Outros usos comuns incluem a verificação da existência destes, saber se um diretório existe, ou procurar um arquivo específico.
Verificando a existência de um Arquivo
Sub FileExists()Dim TheFolder As string 'Location of the fileDim FiletoCheck As String 'Name of the file you want to checkTheFolder = "C:\ExcelFiles" 'Assign directory to TheFolder variable'Capture the name of file to check for using an input boxFiletoCheck = InputBox("Enter the name of the file you want to look for", "Enter file name")'If FiletoCheck is an empty string then file not foundIf FiletoCheck = "" ThenMsgbox "Oh no, the file does not exist"ElseMsgbox "Yes, the file exists."End IfEnd Sub
Tags:
Nenhum comentário:
Postar um comentário