엑셀 VBA를 사용하여 워크시트 복사하는 방법

엑셀 VBA를 사용하여 워크시트 복사하는 방법

엑셀은 많은 사용자들이 일상적으로 사용하는 프로그램 중 하나입니다. 이러한 엑셀 프로그램을 사용할 때 VBA를 이용하면 엑셀의 불편한 부분에 대해서 손쉽게 대처할 수 있습니다. 하나의 예시로 VBA를 사용하여 워크시트를 복사하는 방법을 알려드리겠습니다.

 

칼퇴키트 바로가기

칼퇴키트, 업무용 도구모음

 

1. Copy 메소드

우선 워크시트를 복사하는 가장 기본적인 방법인 Copy 메소드를 사용해보겠습니다. Copy 메소드는 복사하려는 워크시트를 선택하여 해당 워크시트를 먼저 복사한 후 새로운 워크시트를 붙여넣는 방식으로 이루어집니다.

Sub 워크시트_복사()
    Sheets("Sheet1").Copy After:=Sheets("Sheet1")
End Sub

위의 코드에서 Sheet1을 복사하여 Sheet2를 생성하고, Sheet1 다음에 Sheet2를 삽입합니다.

---

2. Add 메소드

또 다른 방법으로는 Add 메소드를 활용하는 방법이 있습니다. Add 메소드는 새로운 워크시트를 생성한 후, 기존의 워크시트의 데이터를 새로운 워크시트에 복사하는 방식입니다.

Sub 워크시트_추가()
    Dim ws As Worksheet
    Set ws = ThisWorkbook.Worksheets.Add
    Sheets("Sheet1").Cells.Copy Destination:=ws.Cells
End Sub

위의 코드에서는 새로운 워크시트인 Sheet2를 생성한 다음, Sheet1의 데이터를 복사하여 Sheet2로 붙여넣습니다.

---

3. Template을 이용한 방법

마지막으로 Template을 이용하여 워크시트를 복사하는 방법입니다. Template을 이용하면 기존의 워크시트를 복사하여 새로운 워크시트를 생성할 수 있습니다.

Sub CopyWorksheetUsingTemplate()
    Dim newWs As Worksheet
    ThisWorkbook.Worksheets("Template").Copy After:=Sheets("Sheet1")
    Set newWs = ActiveSheet
    newWs.Name = "CopyUsingTemplate"
End Sub

위의 코드에서는 Template 워크시트를 복사하여 Sheet2를 생성합니다. 또한 복사된 Sheet2의 이름을 "CopyUsingTemplate"로 변경합니다.

---

4. 마치며

위에서 소개한 세 가지 방법은 VBA를 활용하여 엑셀의 워크시트를 복사하는 방법 중 일부입니다. 이 중에서 적절한 방법을 선택하여, 엑셀 작업을 보다 효율적으로 처리해보세요!

포스팅이 도움이 되셨다면 구독, 공감, 댓글 부탁드려요!

행복한 하루 되세요!