ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   How do I copy a folder from a server using a macro (https://www.excelbanter.com/excel-programming/348166-how-do-i-copy-folder-server-using-macro.html)

macrowriter

How do I copy a folder from a server using a macro
 
I need to copy files and folders from a server to my hard drive using a
macro. I'm not sure how to write the macro using visual basic.

Jim Thomlinson[_4_]

How do I copy a folder from a server using a macro
 
Same as in DOS except using the FileCopy command

FileCopy "source", "destination"
--
HTH...

Jim Thomlinson


"macrowriter" wrote:

I need to copy files and folders from a server to my hard drive using a
macro. I'm not sure how to write the macro using visual basic.


macrowriter

How do I copy a folder from a server using a macro
 
FILECOPY C:\DOCUMENTS\QUIZ april.doc , C:\ARCHIVED\DOCUMENTS\TEST april.doc
here is what I'm trying to do.... am i missing anything?
"Jim Thomlinson" wrote:

Same as in DOS except using the FileCopy command

FileCopy "source", "destination"
--
HTH...

Jim Thomlinson


"macrowriter" wrote:

I need to copy files and folders from a server to my hard drive using a
macro. I'm not sure how to write the macro using visual basic.


Jim Thomlinson[_4_]

How do I copy a folder from a server using a macro
 
Since the files names have spaces in them throw quotes aroung them...

FILECOPY "C:\DOCUMENTS\QUIZ april.doc" , "C:\ARCHIVED\DOCUMENTS\TEST
april.doc"

--
HTH...

Jim Thomlinson


"macrowriter" wrote:

FILECOPY C:\DOCUMENTS\QUIZ april.doc , C:\ARCHIVED\DOCUMENTS\TEST april.doc
here is what I'm trying to do.... am i missing anything?
"Jim Thomlinson" wrote:

Same as in DOS except using the FileCopy command

FileCopy "source", "destination"
--
HTH...

Jim Thomlinson


"macrowriter" wrote:

I need to copy files and folders from a server to my hard drive using a
macro. I'm not sure how to write the macro using visual basic.


KtM

How do I copy a folder from a server using a macro
 
You are missing "", ie
filecopy "what","to"
for example.
filecopy "c:\test.xls","c:\test2.xls"
or use same method as VBA example and use variables, which makes it
easier to change if used repeatedly.


macrowriter

How do I copy a folder from a server using a macro
 
This was very helpful... here is what I have sofar... however I can only seem
to move one file at a time. how can I change this to move all files in the
folder?

Sub FileCopyExample()
Dim sSourcePath As String
Dim sTargetPath As String

' Change these paths to your Source and Target paths.
sSourcePath = "C:\PNTTEMPL\CustomDoc\CHARM.PCD"
sTargetPath = "C:\PNTTEMPL\CustomDoc\TEST\CHARM.PCD"
On Error Resume Next

' Copy the file "My Document" file from "Macintosh HD:Documents"
' to "Macintosh HD:Backup".
FileCopy sSourcePath, sTargetPath

If Err 0 Then MsgBox Err.Description
End Sub


"KtM" wrote:

You are missing "", ie
filecopy "what","to"
for example.
filecopy "c:\test.xls","c:\test2.xls"
or use same method as VBA example and use variables, which makes it
easier to change if used repeatedly.



Jeff

How do I copy a folder from a server using a macro
 
Check out this page:

http://www.rondebruin.nl/folder.htm

"macrowriter" wrote:

This was very helpful... here is what I have sofar... however I can only seem
to move one file at a time. how can I change this to move all files in the
folder?

Sub FileCopyExample()
Dim sSourcePath As String
Dim sTargetPath As String

' Change these paths to your Source and Target paths.
sSourcePath = "C:\PNTTEMPL\CustomDoc\CHARM.PCD"
sTargetPath = "C:\PNTTEMPL\CustomDoc\TEST\CHARM.PCD"
On Error Resume Next

' Copy the file "My Document" file from "Macintosh HD:Documents"
' to "Macintosh HD:Backup".
FileCopy sSourcePath, sTargetPath

If Err 0 Then MsgBox Err.Description
End Sub


"KtM" wrote:

You are missing "", ie
filecopy "what","to"
for example.
filecopy "c:\test.xls","c:\test2.xls"
or use same method as VBA example and use variables, which makes it
easier to change if used repeatedly.




All times are GMT +1. The time now is 09:57 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com