B
Bob Phillips
Dave, You have to open it to copy to it.
dim oWb As Workbook
Set oWb = Workbooks.Open("C:\Documents and Settings\Dave Newman\My
Documents\Admin\Test mule.xls")
Range("A1").CurrentRegion.Copy. _
oWb.Sheets(1).Range ("A6")
(not tested)
dim oWb As Workbook
Set oWb = Workbooks.Open("C:\Documents and Settings\Dave Newman\My
Documents\Admin\Test mule.xls")
Range("A1").CurrentRegion.Copy. _
oWb.Sheets(1).Range ("A6")
(not tested)