Copy Paste from external sheet Runtime error 424 Object Required

I am getting inconsistencies in this working and not working

it particularly errors out on ' Sheet2.Select'

with the 424 error or a different error, and Runtime error '1004' Method 'Select of Object'_Worksheet' failed

would appreciate some insight as I am still fairly new to VBA



Sub Run_Report()

Dim sSource_File1_Open As String
sSource_File1_Open = Range("Willis_Med_1").Value

Dim sSource_File1 As String
sSource_File1 = Range("File_1.xlsx").Value

'OPENS SOURCE FILE
Workbooks.Open Filename:="" & sSource_File1_Open & ""

'COPIES SOURCE FILE DATA RANGE
Range("A2:F100").Select
Selection.Copy


'SELECTS SHEET 201 (EXEC SUM SOURCE) AND PASTES DATA
Windows("" & sTemplate & "").Activate
Sheet2.Select
Range("A2").Select
Selection.PasteSpecial Paste:=xlPasteAll

Windows("" & sSource_File1 & "").Activate
Application.CutCopyMode = False
ActiveWorkbook.Close

It should be

Please Login or Register  to view this content.

You're welcome...Good luck.

No problem. If you are still having an issue, start another thread, I'm sure someone here can help you out.