Kill komutu calismiyor.

[bolmez]

Selamlar,

Sub musterisilme()
Kill "C:\musteriler\ahmet.xls"
End Sub

ile ahmet.xls dosyasini silmek istiyorum. Makroyu calistirdigim zaman ahmet.xls dosyasini silmiyor.

Sebebini bilen varsa sevinirim. Tesekkurler.

Not: Silmek istedigim dosya Readonly degil. Bu dosyayi Windows Explorer kullanarak silebiliyorum.

 

[Merhum İdris SERDAR]

Denedim. Bende dosyayı siliyor.

 

[bolmez]

Denedim. Bende dosyayı siliyor.

Ben de bende neden silmedigini merak ediyorum. Muhtemel sebepleri konusunda bilgisi olan var mı?

 

[abdi]

Sayın bolmez,
silinecek dosyayı aynı dosya üzerinde açarakmı silmeye çalışıyorsunuz.
Yoksa kodu farklı bir kitaba yazdınız oradanmı deniyorsunuz.
Sayın yurttas, arkadaşım gibi bende denedim kod çalışıyor.

 

[bolmez]

Sayın bolmez,
silinecek dosyayı aynı dosya üzerinde açarakmı silmeye çalışıyorsunuz.
Yoksa kodu farklı bir kitaba yazdınız oradanmı deniyorsunuz.
Sayın yurttas, arkadaşım gibi bende denedim kod çalışıyor.

Silmek istedigim dosyayi acmadan baska bir "excel book" ta yazdigim makro ile silmek istiyorum.

Kill "C:\musteriler\ahmet.xls"

ile dosya uzerinde hicbir islem yapmiyor. Ancak,

Name "C:\musteriler\ahmet.xls" As "C:\musteriler\ahmet222.xls"

ile dosya adi degisiyor. Yani "Kill" calismazken "Name" calisiyor ve dosyanin adini degistiriyor.

 

[geren36]

Dim a As String
a = "C:\musteriler\ahmet.xls"
Kill a