Klasördeki dosyaları başka bir klasöre taşımak

[1903emre34@gmail.com]

Merhaba,

A klasörü içinde; Ocak,Şubat dosyaların içinde pdf uzantılı dosyaları B klasörüne taşımak için gerekli makro konusunda yardımlarınızı bekliyorum, forum baktım ama bulamadım.

 

[leumruk]

Selamlar,

Sub Klasor_tasi()
Set kls = CreateObject("Scripting.FileSystemObject")
kls.MoveFolder "C:\Eski", "D:\Yeni"
End Sub

 

[leumruk]

Başlık değişti sanırım,
Dosya taşıma için linkleri inceleyiniz: Anahtar kelime taşıma için "movefile"... Kopyalama için "copyfile"
http://www.excel.web.tr/f48/dosya-ta-yma-t162859.html
http://www.excel.web.tr/f48/dosya-kopyalama-ta-yma-t160149.html
http://www.excel.web.tr/f48/dosya-ta-yma-t152316.html