Views

Histats

Vitrine

VBA: Deletando arquivos - 03

Mas e se eu quiser deletar todos os arquivos de um determinado tipo do diretório?
 
Dim MyFile As String
Dim nType as String
Let MyFile = Dir$("c:\temp\*.doc") Let nType="*.doc"
 
Do While MyFile <> ""     KillProperly "c:\temp\" & MyFile     Let MyFile = Dir$("c:\temp\" & nType) Loop

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

✔ VBA Brazil®

✔ VBA Brazil®
brazilsalesforceeffectiveness@gmail.com
Related Posts Plugin for WordPress, Blogger...
diHITT - Notícias