Kill
metodunu kullanarak tam yolu verilmiş olan bir dosyanın nasıl silinebileceğini gösteren makro kodudur.
Kill
fonksiyonu ile silinen dosya çöp kutusuna atılmadan silinmektedir. Silme işlemini yaparken dikkatli olmanızda fayda var, çünkü dosyayı geri getiremeyebilirsiniz.
Option Explicit
Sub DosyaSil()
Dim silinecekDosya As String
On Error Resume Next
silinecekDosya = "C:\arşiv\ornek-dosya.txt"
Kill silinecekDosya
End Sub
Sub DosyaSil()
'--------------------------------------------------
'Silinecek dosyanın tam yolunu bir değişkene
'atayacağız, bu yüzden değişken oluşturduk.
'--------------------------------------------------
Dim silinecekDosya As String
'--------------------------------------------------
'Eğer bir sorun olursa sonraki
'satırdan devam et.
'--------------------------------------------------
On Error Resume Next
'--------------------------------------------------
'Dosyanın tam yolunu değişkene atadık.
'--------------------------------------------------
silinecekDosya = "C:\arşiv\ornek-dosya.txt"
'--------------------------------------------------
'Kill metodu ile dosyayı siliyoruz.
'--------------------------------------------------
Kill silinecekDosya
End Sub