Hi,

I have recorded a macro to copy from a sheet in a workbook and paste into another workbook to use for an access upload into one of our systems. I am trying to figure out how to have the macro of the location of the workbook being copied change as the file name changes. The filename that changes is the ("13-9999-quotation.xls") in the code I have listed below.

Sub Macro1()
'
' Macro1 Macro
'

'
    Rows("2:2").Select
    Selection.Copy
    ChDir "J:\Blank Templates\Sales Process Templates\Timberline Upload"
    Workbooks.Open Filename:= _
        "J:\Blank Templates\Sales Process Templates\Timberline Upload\Excel Work Order Upload  - Template.xls"
    Application.CalculateFullRebuild
    Application.CalculateFull
    Windows("13-9999-quotation.xls").Activate
    Selection.Copy
    Windows("Excel Work Order Upload  - Template.xls").Activate
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Application.CutCopyMode = False
    ActiveWorkbook.Save
    ActiveWorkbook.Close
    Range("A2").Select
End Sub
Thank you,
Sandi