| |
microsoft.public.word.vba.general |
or something like: Dim strDefFilePath As String, strFileToCopy As String strSourcePath = "c:\Patients\AMR\" strSourcePath = "" ' identify folderA ' ... but it needs to move over up to 10 jpg files :) "gil" <gil...@bellsouth.net> wrote in message news:eEBS2KmvHHA.4552@TK2MSFTNGP03.phx.gbl... ? Possibly something like: Dim date1 As String date1 = Selection.Text ' navigation code to new selection Dim date2 As String date2 = Selection.Text Dim folderA As String ' identify folderA Dim folderB As String ' identify folderB ' ??? Object.MoveFile Source, Destination WordBasic.CopyFileA folderA ?? FileName:= ??, Directory:=folderB Cheers & tia Gil
Dim strSourcePath As String, strSourceFile As String
Dim objFSO As Object
strDefFilePath = "c:\Patients\"
strFileToCopy = "TorrTod.doc"
strSourceFile = strSourcePath & strFileToCopy
strDefFilePath = "" ' identify folderB
strFileToCopy = "CartSamu.doc" ' but how to identify by date or time?
strSourceFile = strSourcePath & strFileToCopy
Gil
Hi All, . I am seeking vba code to MOVE files created between date1 and date2 from folderA to folderB?