Tazthemonkey
New Member
Hi,
I'm running winxp excel 2010 adobe 9, everyone else is on newer pc's mine is not upgraded due to this problem.
Range"A1" is an order number manually inputed
Macro is
[Sub CopyPDFATD()
Dim src As String, dst As String, fl As String
src = "I:\Website Technical Data\Installation Instructions Master Directory\Adventure Trail - Timber\Adventure Trail - Timber (Timber in Ground)"
dst = "O:\Installation\Installation Instructions\Installation Instruction Input\COPIES For Installers\" & Range("A1").Text
fl = "INST Log Walk ATD_iss06.pdf"
On Error Resume Next
FileCopy src & "\" & fl, dst & "\" & fl
End Sub]
Thanks in advance Terry
I'm running winxp excel 2010 adobe 9, everyone else is on newer pc's mine is not upgraded due to this problem.
Range"A1" is an order number manually inputed
Macro is
[Sub CopyPDFATD()
Dim src As String, dst As String, fl As String
src = "I:\Website Technical Data\Installation Instructions Master Directory\Adventure Trail - Timber\Adventure Trail - Timber (Timber in Ground)"
dst = "O:\Installation\Installation Instructions\Installation Instruction Input\COPIES For Installers\" & Range("A1").Text
fl = "INST Log Walk ATD_iss06.pdf"
On Error Resume Next
FileCopy src & "\" & fl, dst & "\" & fl
End Sub]
Thanks in advance Terry