Bir klasördeki eski raporları temizleyen bir makroya mı ihtiyacınız var? VBA'nın "Kill" komutu dosya siler. (Dikkatli kullanın, Geri Dönüşüm Kutusuna gitmez, direkt silinir!)
Kod Örneği
Sub DosyaSil()
On Error Resume Next 'Dosya yoksa hata verme
Kill "C:\Raporlar\Eski_Rapor.xlsx"
MsgBox "Dosya silindi."
End Sub
On Error Resume Next 'Dosya yoksa hata verme
Kill "C:\Raporlar\Eski_Rapor.xlsx"
MsgBox "Dosya silindi."
End Sub
Tüm klasörü temizlemek için Kill "C:\Temp\*.xlsx" gibi joker karakter kullanabilirsiniz.
Henüz yorum yapılmamış. İlk yorumu sen yap!
Yorum Yap