Excel VBA의 별도 통합 문서에서 정보 복사

Question

A2에서 A4로 정보를 복사하여 현재 통합 문서로 복사하고 다음 코드를 사용하여 매크로를 실행할 때 메시지가 나타납니다. 실행 - 시간 오류 '9', 아래 첨자 범위 벗어났습니다. 범위 내에서 어떻게 만들 수 있습니까? 이 범위를 선택 않도록

Application.Workbooks("Client and Project Droplist").Worksheets("Sheet1").Range("A2:A4").Select 
Selection.Copy 

Me.Range("A1").Select 
ActiveSheet.Paste 

UPDATE는

나는 그것을 만든 적이 있지만 지금은 런타임 오류 13 무엇입니까 : 유형 불일치. 새 코드는 다음과 같습니다.

Private Sub Macro_Click() 
Application.Workbooks("Client and Project Droplist").Activate 
Application.Workbooks("Client and Project Droplist").Worksheets("Sheet1").Select 
Application.Workbooks("Client and Project Droplist").Worksheets("Sheet1").Range("A2:A4").Select 

Selection.Copy 

Workbooks("VBA Exercises").Worksheets(Sheet1).Select 
'Workbooks("VBA Exercises").Worksheets(Sheet1).Range("A1").Select 
'ActiveSheet.Paste 

End Sub 

나는 아직 거기에 아직 도착하지 않았기 때문에 마지막 두 줄을 주석 처리했습니다.

Answer 1

이것은 나를 위해 일했습니다. 실제 파일 이름을 지정해야하는 것처럼 보입니다. 활성 파일에 붙여 넣으려고하면 실제로 활성화되지 않았습니다.

Application.Workbooks("client and Project Droplist.xlsx").Worksheets("Sheet1").Range("A2:A4).Select 
Selection.Copy 

Application.Workbooks("Book1.xlsx").Worksheets("Sheet1").Range("A1").Select 
Selection.Paste