Suruculer arasi dosya kopyalama..

[TRUSA]

Merhaba arkadaslar,

Macro ile bir dosyayi , bir surucuden baska bir surucuye nasil kopyalayabilirim.

Ornegin : R:\Ortak\Bolum\deneme.xls dosyasini P:\RIK\Ozel\ altina macro ile nasil kopyalayabilirim.

Yardimlariniz ve paylasimciliginiz icin simdiden tesekkurler..

 

[hamitcan]

Aşağıdaki şekilde deneyin.

Sub Dosya_Kopyala()
Dim ds
Set ds = CreateObject("Scripting.FileSystemObject")
ds.CopyFile "R:\Ortak\Bolum\deneme.xls", "P:\RIK\Ozel"  
End Sub