No VBA podemos deletar qualquer arquivo presente no computador usando códigos VBA e o código que é utilizado para deletar qualquer arquivo é conhecido como comando Kill, o método para deletar qualquer arquivo é primeiro, nós fornecemos o caminho do arquivo que significa onde o arquivo está localizado no computador e, em seguida, usamos o comando Kill para excluir o arquivo.
Como excluir arquivos usando código VBA?
O VBA é uma coisa difícil no início, mas à medida que você passa mais tempo com o VBA, você começará a amá-lo como eu. Podemos abrir arquivos de outra pasta de um computador, podemos trabalhar com eles e agora podemos excluir arquivos também usando a codificação VBA. Neste artigo, mostraremos como você pode excluir arquivos usando o código VBA na pasta específica.
Quando estamos trabalhando com grandes projetos, geralmente criamos muitos arquivos intermediários para dar suporte ao nosso processo. Depois que todo o trabalho estiver concluído, precisamos excluir esses arquivos para evitar qualquer tipo de confusão no futuro.
E um cenário é quando geralmente recebemos um e-mail. Salvamos anexos para o nosso trabalho normal ou queremos apenas ver o relatório daquele momento e, posteriormente, podemos precisar excluir esses arquivos.
Excluir esses arquivos manualmente levará algum tempo, ou podemos esquecer de salvá-los, e isso ocupará espaço em nosso computador. Mostraremos como excluir esses arquivos com códigos VBA simples.
Método Kill para excluir arquivos em uma pasta usando código VBA
Uma função KILL simples excluirá a pasta, o arquivo específico, todos os arquivos do Excel, etc. Dê uma olhada na sintaxe do método KILL no VBA. O método kill não pode excluir arquivos somente leitura.
Nome do caminho : o nome do caminho nada mais é do que o caminho da pasta no computador para excluir os arquivos.
Observação: o nome do caminho também pode incluir caracteres curinga. Podemos usar um asterisco (*) e pontos de interrogação (?) Como caracteres curinga no Excel.
O asterisco (*) é útil para corresponder a qualquer string de qualquer comprimento, mesmo zero é considerado.
O ponto de interrogação (?) É útil para corresponder a apenas um único caractere.
Excluir nome de arquivo específico
Por exemplo, tenho uma pasta como a abaixo.
Nesta pasta, desejo excluir o arquivo denominado “Arquivo 5”. Inicie o código com a função KILL.
Código:
Sub Delete_Files () Kill (PathName) End Sub
Copie e cole o caminho da pasta.
E cole entre aspas duplas.
Mate "E: Arquivos do Excel"
Agora coloque mais uma barra invertida () e digite o nome do arquivo com a extensão.
Mate "E: Excel Files File5.xlsx"
Ao executar este código, ele excluirá o arquivo denominado “Arquivo 5.xlsx” no caminho da pasta mencionada.
Excluir todos os arquivos do Excel
Para excluir todos os arquivos do Excel na pasta usando o VBA, precisamos usar caracteres curinga com a função KILL. Depois de mencionar o caminho da pasta, precisamos mencionar o arquivo como “* .xl *.”
Código:
Mate "E: Arquivos do Excel *. Xl *"
Ao executar esse código, todos os arquivos do Excel da pasta serão excluídos.
We have seen how we can delete a single excel file and all the excel files. But if we want to delete all the files in the folder, how can we delete it. Since we are using Excel VBA, can it delete other files?
The answer is Yes!!! Use the below code to delete all the files in the folder.
Code:
Kill "E:Excel Files*.*"
Delete Entire Folder Only
Is it possible to delete the entire folder itself?
Yes, it is possible.
To do this, the first thing we need to do is we need to delete all the files in the folder by using the KILL function and then to delete the folder, and we need to use one more function called RmDir.
Code:
RmDir "E:Excel Files "
Here RmDir will delete only the empty folder if any subfolder is where it cannot delete them.
Delete All the Text Files in the Folder
Para excluir todos os arquivos de texto da pasta, use o código abaixo.
Código:
Mate "E: Arquivos do Excel *. Txt"
Excluir arquivos somente leitura
Como eu disse, a função KILL não pode excluir arquivos “Somente leitura” da pasta. Nesse caso, precisamos usar as outras duas funções “Dir $” e “SetAttr”. Abaixo está o código de exemplo para excluir também os arquivos somente leitura.
Código:
Sub Delete_Files1 () Dim DeleteFile As String DeleteFile = "E: Excel Files " If Len (Dir $ (DeleteFile))> 0 Then SetAttr DeleteFile, vbNormal Kill DeleteFile End If End Sub
Você pode baixar este modelo de arquivo de exclusão VBA aqui - modelo de arquivo de exclusão VBA Excel.
