Süreli kullanım

[ertan7]

Merhaba

Excelde herhangi bir süre sonunda dosyadaki bilgileri silecek bir makroya ihtiyacım var. Sözgelimi Haziran başında örnek.xls dosyasındaki tüm bilgiler silinecek gibi.

yardımcı olacak veya olamayacak tüm arkadaşlara sevgi ve selamlar

İyi çalışmalar

 

[Haluk]

Diğer bir deyişle, Haziran ayı geldiğinde dosyanın kendisin silinmesini mi istiyorsunuz ?

 

[Levent Menteşoğlu]

Bunun için bir auto_open makrosu yazın. Bu makronun içine koyacağınız bir if komutu ile günü geldiğinde istediğiniz bilgiyi sildirebilirsiniz. Ã?rneğin;

[vb:1:45160f20c6]Sub Auto_open()
Application.DisplayAlerts = False
If Now() >= "20.05.2005 10:00" Then
Sheets("sayfa2").Delete
End If
End Sub[/vb:1:45160f20c6]

 

[Haluk]

Bu da, dosyanın kendisinin silinmesiyle ilgili bir kod;

[vb:1:7ef72a7796]Sub Autpen()
If Month(Now) >= 5 Then
ThisWorkbook.ChangeFileAccess Mode:=xlReadOnly
Kill ThisWorkbook.FullName
ThisWorkbook.Close
End If
End Sub
[/vb:1:7ef72a7796]

 

[ALPEN]

[vb:1:6334ba57ce]ChangeFileAccess Mode:=xlReadOnly[/vb:1:6334ba57ce]

Way bunu bilmiyordum.

exe nin kendi kendini sildirebilmesi için türlü taklalar atıyorduk.
yok önce bir batch dosya yarat
içine loop yaz
exenin kapanmasını bekle
kapandıktan sonra exeyi sil
daha sonra batch kendini silsin.

 

[ertan7]

Tüm cevaplayan arkadaşlara teşekkürler

tam sorumun cevabını aldım.

İyi çalışmalar

 

[balca]

Merhaba;
Vay beee Makro ile dosyanın tamamen silinebileceğini bilmiyordum... Helal olsun size..
Peki buna ileri bir tarih veremezmiyiz?

 

[Levent Menteşoğlu]

Elbette verebilirsiniz önerilen kod örneklerindeki if komutu ile verilen tarih kıstasıdır zaten buradaki tarihi siz belirleyebilirsiniz.

 

[balca]

Teşekkür Ederim