Как скопировать лист из одного файла в другой? Ситуация следующая: есть два Excel файла, например 1 и 2. Открыт 2-ой. мне нужно сделать в 2-м файле на листе кнопку, нажав на которую, с 1-го файла будет скопирован лист "Отчет" и вставлен например в конец, как это сделать программно?

кладовщикКопироваться будет не Лист, как я понимаю, а Range. С помощью метода Copy
This example copies the formulas in cells A1:D4 on Sheet1 into cells E5:H8 on Sheet2.

Worksheets("Sheet1").Range("A1:D4").Copy _
destination:=Worksheets("Sheet2").Range("E5")

мне нужно именно лист скопировать ( с тем же именем, но при этом осуществлять проверку на существование в данном файле листа с таким названием)

открываться по нажатию кнопки перед копированием данных с листа

Решила задачу след. образом:

Sub q()
On Error GoTo err
del_list
Application.Workbooks.Open "C:\forma46\1.xls"
Application.ActiveWorkbook.Worksheets("Form46").Select
Sheets("Form46").Copy After:=Workbooks("2.xls").Sheets(3)
Windows("1.xls").Activate
' закрытие 1
Application.Workbooks("1.xls").Close
Exit Sub

err:

End Sub

Sub del_list()
Dim SheetName As String
On Error Resume Next: Application.DisplayAlerts = False
ActiveWorkbook.Sheets("Form46").Delete
Application.DisplayAlerts = True: On Error GoTo 0
End Sub