No VBA do Microsoft Excel, a função Dir é usada para retornar o primeiro nome do arquivo num diretório especificado, e uma lista dos seus atributos.
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 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.
Percorrer os arquivos em uma pasta
Sub AllFiles()Dim MyFolder As String 'Path containing the files for loopingDim MyFile As String 'Filename obtained by Dir functionLet MyFolder = "C:\ExcelFiles" 'Assign directory to MyFolder variableLet MyFile = Dir (MyFolder) 'Dir gets the first file of the folder'Loop through all files until Dir cannot find anymoreDo While MyFile <> ""The statements you want to run on each fileLet MyFile = Dir 'Dir gets the next file in the folderLoopEnd Sub
Nenhum comentário:
Postar um comentário