Makro ile Klasör Silme

[YASINT]

Selam arkadaşlar ben makro yardımıyla "C:\Documents and Settings\Yasin\Desktop\FRM" klasörünü silmeye çalışıyorum. Fakat bir türlü silemedim. Bunun için RMDIR komutunu kullanıyorum. Ama beceremedim. Bir örnek komut ile bana yardımcı olursanız sevinirim. Teşekkürler.

 

[N.Ziya Hiçdurmaz]

yanıt

Bir deneyiniz.

Sub Klasor_Sil()
Dim ds
Set ds = CreateObject("Scripting.FileSystemObject")
ds.DeleteFolder "C:\Documents and Settings\Yasin\Desktop\FRM"
End Sub

 

[Levent Menteşoğlu]

Aşağıdaki gibi olmadımı?

RmDir ("C:\Documents and Settings\Yasin\Desktop\FRM")

 

[Ferhat Pazarçevirdi]

sub sil()
dim klasor as string
klasor="C:\Documents and Settings\Yasin\Desktop\FRM"
rmdir(klasor)
end sub

 

[2008model]

merhaba

benimde ortak kullanımdığım dosya var "D:\YEDEK" DİZİNİNİ SİLMEK İSTİYORUM ANCAK OLMUYOR.YEDEK DOSYAMIN İÇİNDE BİRÇOK KLASÖR VAR İÇLERİ DOLU KOMPLE BÜYÜKLÜĞÜ 10 GB. ÜSTÜNDE.DOSYAYI SİLMEK İÇİN BAŞKA YOL VARMI YADA SORUN NERDE ACABA.AŞAGIDAKİ İKİ ÖRNEK MAKROYUDA DENEDİM OLMADI YARDIMCI OLURSANIZ ÇOK MEMNUN OLURUM

ÖRNEK 1:
RmDir ("D:\YEDEK")


ÖRNEK 2:
Sub Klasor_Sil()
Dim ds
Set ds = CreateObject("Scripting.FileSystemObject")
ds.DeleteFolder "D:\YEDEK"
End Sub

 

[2008model]

Değerli arkadaşlar

yardımcı olabilecek kimse yokmu?

 

[halit3]

merhaba

benimde ortak kullanımdığım dosya var "D:\YEDEK" DİZİNİNİ SİLMEK İSTİYORUM ANCAK OLMUYOR.YEDEK DOSYAMIN İÇİNDE BİRÇOK KLASÖR VAR İÇLERİ DOLU KOMPLE BÜYÜKLÜĞÜ 10 GB. ÜSTÜNDE.DOSYAYI SİLMEK İÇİN BAŞKA YOL VARMI YADA SORUN NERDE ACABA.AŞAGIDAKİ İKİ ÖRNEK MAKROYUDA DENEDİM OLMADI YARDIMCI OLURSANIZ ÇOK MEMNUN OLURUM

ÖRNEK 1:
RmDir ("D:\YEDEK")


ÖRNEK 2:
Sub Klasor_Sil()
Dim ds
Set ds = CreateObject("Scripting.FileSystemObject")
ds.DeleteFolder "D:\YEDEK"
End Sub

aşağıdaki kodu denermisiniz

Sub klasörsil()
Dim DosyaSistemi
Set DosyaSistemi = CreateObject("Scripting.FileSystemObject")
DosyaSistemi.DeleteFolder "D:\YEDEK"
End Sub

 

[2008model]

çok teşekkürler cevabınız için.deniyorum ancak olmuyor. Verdiği hata "permission denied" çok enteresan ..yinede çok teşekkür ederim emeğin için

 

[halit3]

çok teşekkürler cevabınız için.deniyorum ancak olmuyor. Verdiği hata "permission denied" çok enteresan ..yinede çok teşekkür ederim emeğin için

bu hata kodu yanılmıyorsam yetki ile ilgili silmek için yetkiniz yok anlamına geliyor herhalde bilgisayarınızda kısıtlamalar varsa bu hatayı alırsınız.

 

[2008model]

valla yetkilik bir durum yok hani.ben windows 7 kullanıyorum.klasörün içinde excell dosyaları koyuyorum tüm excell dosyalarını siliyor.klasör boş olursa klasörüde siliyor sorunsuz.ama klasörün içinde karışık bir çok osya ve klasör bulunduğunda silemiyor...belki aynı sorunu yaşayan olmuştur daha önceleri..

 

[halit3]

klasörü silerken
klasörün içindeki dosyalardan herhangi biri açık olursa klasörü silmez

 

[2008model]

yok dostum tüm dosyalar kapalıyken deniyorum zaten.inşallah çözeceğiz yoksa uyumak yok sabaha kadar

 

[2008model]

yardım edecek yokmu bana acaba..?

 

[halit3]

birde başka klasörü dene yedek yerine başka klasör yaz d sürücüsündede olsun bir dene kod çalışıyor kodda sorun yok

 

[2008model]

sayın halit özdemir yardımların için çook çokk teşekkürler .allah razı olsun senden

 

[halit3]

iyi akşamlar

 

[irfancantr]

Bende bu konu hakkında birşey sormak istiyorum;

Birden fazla klasör silmek istediğimizde nasıl bir komut ve seçtiğimiz klasör (C:\ - D:\) içinde daha önceden sildiğimiz ve tekrar aynı işlemi uyguladığında hata vermemesi için dosya yoksa diğer dosyayı araması için nasıl bir işlem yapabiliriz?

Örn:

D klasöründe
rapor1
rapor2
istatistik_ank
sonuç77

gibi dosyalarım var hepsini silmek istiyorum ama daha önceden rapor2 dosyası silinmiş,
sıradaki diğer dosyaları silmeye devam edebilir mi?

Şimdiden teşekkür ediyorum.....

 

[halit3]

Bende bu konu hakkında birşey sormak istiyorum;

Birden fazla klasör silmek istediğimizde nasıl bir komut ve seçtiğimiz klasör (C:\ - D:\) içinde daha önceden sildiğimiz ve tekrar aynı işlemi uyguladığında hata vermemesi için dosya yoksa diğer dosyayı araması için nasıl bir işlem yapabiliriz?

Örn:

D klasöründe
rapor1
rapor2
istatistik_ank
sonuç77

gibi dosyalarım var hepsini silmek istiyorum ama daha önceden rapor2 dosyası silinmiş,
sıradaki diğer dosyaları silmeye devam edebilir mi?

Şimdiden teşekkür ediyorum.....

aşağıdaki linkdeki dosyaya bir göz atarmısın

http://www.excel.web.tr/showthread.php?t=68040

 

[irfancantr]

Emek saygı ister, elinize sağlık hocam
Sabrınıza ve saygınıza sığınarak bir sorum daha olacak,
a1 hücresinden başlayarak D klasöründe bulunan tüm xlm ve veya xlms dosyalarını yazabilir mi acaba?

 

[halit3]

Emek saygı ister, elinize sağlık hocam
Sabrınıza ve saygınıza sığınarak bir sorum daha olacak,
a1 hücresinden başlayarak D klasöründe bulunan tüm xlm ve veya xlms dosyalarını yazabilir mi acaba?

aşağıdaki linkdeki dosyaya bir göz at

http://www.excel.web.tr/showthread.php?t=58047