셀 값에 따라 열을 다른 시트로 복사하려면 어떻게 하나요？

날짜 헤더가 있는 열에 데이터가 분포되어 있을 때， 한 워크시트에서 특정 전체 열을 추출하여 다른 시트로 복사해야 하는 경우가 자주 발생합니다。 단， 워크북 내 다른 위치에 입력된 특정 날짜 값과 일치하는 열만 복사해야 합니다。 예를 들어，Sheet1에 각 열 헤더가 서로 다른 날짜인 테이블이 있고，Sheet2!A1에 대상 날짜를 입력했다고 가정해 보겠습니다。 이때Sheet1에서 헤더가Sheet2!A1의 날짜와 일치하는 전체 열을 자동으로 또는 쉽게 복사하여Sheet3에 붙여넣고 싶을 것입니다(아래 그림 참조)。 일별 지표 비교， 일정 관리， 보고서용 특정 시점 데이터 추출 등에서 흔히 발생하는 과제입니다。

---

수식을 사용하여 셀 값에 따라 열을 다른 시트로 복사하기

Excel 의INDEX함수와MATCH함수를 함께 사용하면 다른 시트에서 참조한 특정 헤더 값에 따라 소스 시트에서 전체 열을 효율적으로 검색할 수 있습니다。 이 방법은 셀 값이 변경될 때마다 데이터가 자동으로 업데이트되어야 할 경우 특히 유용하며 수동 조정이나 반복적인 복사-붙여넣기 작업을 줄여줍니다。

1. 열 값이 붙여넣어질 대상 시트의 셀을 선택합니다。 예를 들어，Sheet3!A1을 클릭한 후 다음 수식을 입력하세요：

=INDEX(Sheet1!$A1:$E1,MATCH(Sheet2!$A$1,Sheet1!$A$1:$E$1,0))

Enter키를 눌러 수식을 적용한 후 필요한 만큼(보통)Sheet1의 데이터 범위에 해당하는 행까지) 채우기 핸들을 아래로 드래그하세요. 데이터 범위이 끝나는 위치에 0 이 나타날 수 있습니다。

2. 결과에서 나타나는 0 값을 필요에 따라 삭제하거나 필터링하여 추출된 열을 정리하세요。

참고： 이 수식에서Sheet2!A1은 조회 날짜가 포함된 셀이고，Sheet1!A1:E1은 확인할 헤더 범위입니다. 실제 데이터 레이아웃과 범위 크기에 따라 이 참조를 조정하세요. 데이터 테이블이 더 크다면 범위를 적절히 확장하세요. 또한 데이터에 빈 셀이 포함되어 있으면 출력 결과에 0 이 표시될 수 있으므로 깔끔한 결과를 위해 필터를 적용하거나 IFERROR 논리를 고려하세요。

---

VBA 코드 - 셀 값에 따라 열을 자동으로 다른 시트로 복사하기

이 열 추출 작업을 자주 수행하거나 대상 날짜가 변경될 때마다 수식 설정이나 수동 작업 없이 해결책을 원한다면 간단한 VBA 매크로를 사용할 수 있습니다。 이 스크립트는Sheet1에서Sheet2!A1의 날짜와 일치하는 열을 찾아 전체 열을 직접Sheet3에 복사합니다。 반복되는 워크플로를 자동화하거나 동적 데이터 구조를 처리할 때 이상적인 방법입니다。

주의사항：매크로를 실행하기 전에는 반드시 작업 내용을 저장하세요。 매크로는 실행 취소가 불가능하며 잘못된 참조는 데이터를 의도하지 않은 위치로 복사할 수 있습니다。

1. Alt + F11를 눌러 Visual Basic for Applications 편집기를 엽니다。 VBA 창에서삽입>모듈을 클릭한 후 다음 코드를 빈 모듈에 붙여넣으세요：

Sub CopyColumnByDate()
    Dim wsSource As Worksheet
    Dim wsDest As Worksheet
    Dim lookupSheet As Worksheet
    Dim matchDate As Variant
    Dim lastRow As Long
    Dim colNum As Long
    Dim headerRange As Range
    Dim cell As Range
    
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    Set wsSource = Worksheets("Sheet1")
    Set wsDest = Worksheets("Sheet3")
    Set lookupSheet = Worksheets("Sheet2")
    matchDate = lookupSheet.Range("A1").Value
    
    Set headerRange = wsSource.Range(wsSource.Cells(1, 1), wsSource.Cells(1, wsSource.Cells(1, wsSource.Columns.Count).End(xlToLeft).Column))
    colNum = 0
    
    For Each cell In headerRange
        If cell.Value = matchDate Then
            colNum = cell.Column
            Exit For
        End If
    Next cell
    
    If colNum > 0 Then
        lastRow = wsSource.Cells(wsSource.Rows.Count, colNum).End(xlUp).Row
        wsDest.Range("A1").Resize(lastRow, 1).Value = wsSource.Range(wsSource.Cells(1, colNum), wsSource.Cells(lastRow, colNum)).Value
        MsgBox "Data copied to Sheet3 column A!", vbInformation, "KutoolsforExcel"
    Else
        MsgBox "No matching header found.", vbExclamation, "KutoolsforExcel"
    End If
End Sub

2.VBA 편집기를 닫습니다. Excel 에서Alt + F8을 누르고CopyColumnByDate를 선택한 후실행을 클릭합니다。 그러면Sheet1에서 일치하는 날짜 열의 데이터가Sheet3의 A 열로 복사됩니다。

팁：헤더가 1 행이 아닌 다른 행에서 시작하는 경우 코드 내 행 참조를 조정하세요。 데이터를 다른 시작 열에 붙여넣고 싶다면Range("A1")을 적절히 변경하세요。 동일한 매크로를 자주 사용한다면 버튼에 할당하여 쉽게 접근할 수 있도록 고려해 보세요。

가능한 오류：「일치하는 헤더를 찾을 수 없습니다」라는 메시지가 표시되면Sheet2!A1의 날짜가Sheet1헤더 행의 날짜 형식과 정확히 일치하는지 확인하세요。

---

기타 기본 제공 Excel 방법 - 필터를 사용하여 열을 격리 및 복사하기

Excel 의 기본 제공필터기능을 사용하면 수식이나 매크로 없이도 열을 격리하고 복사할 수 있습니다。 이 수동 방식은 가끔씩 수행하는 일회성 작업이나 함수나 스크립팅에 익숙하지 않은 사용자에게 효과적입니다。

1. Sheet1으로 이동하여 헤더 행(예: 1 행)을 선택합니다。데이터>필터를 클릭하여 각 헤더에 드롭다운을 추가합니다。

2. 헤더 행의 필터 드롭다운 화살표를 클릭하고Sheet2!A1과 일치하는 날짜를 제외한 모든 열의 선택을 해제합니다。 날짜가 많을 경우 필터 메뉴의 검색 상자를 사용해 해당 날짜 값을 빠르게 찾을 수 있습니다。

3. 일치하는 헤더 아래의 표시된 열을 선택합니다。Ctrl + C를 눌러 복사합니다。

4. Sheet3으로 이동하여 원하는 시작 셀(예： A1)을 클릭한 후Ctrl + V를 눌러 붙여넣습니다。

참고：필터 방법은 완전히 수동적이며Sheet2!A1의 날짜가 변경되더라도 자동으로 업데이트되지 않습니다。 자동화가 필요 없는 임시 데이터 추출이나 빠른 검토에 적합한 접근 방식입니다。

장점：수식이나 코딩이 필요 없으며 시각적 작업에 간편합니다。
단점：자주 반복하면 번거롭고 열 선택 시 주의하지 않으면 오류가 발생하기 쉽습니다。

---