Views

Histats

Vitrine

VBA: Deletando arquivos 02

Tá certo, tudo bem...Sim podemos apagar mais de um arquivo no mesmo diretório.

' Efetua-se um Loop através de todos os arquivos em um diretório usando a  função Dir$
Dim MyFile As String
Let MyFile = Dir$("c:\temp\*.*")
Do While MyFile <> ""
    KillProperly "c:\temp\" & MyFile
    ' Neste exemplo ainda precisa especificar todo o path
    Let
MyFile = Dir$("c:\temp\*.*")
Loop  

André Luiz Bernardes
 | bernardess @ gmail . com | InAnyPlace (Skype) | Blog Office VBA | Blog Excel | Blog Access    |

LinkWithinBrazilVBAExcelSpecialist

Related Posts Plugin for WordPress, Blogger...