엑셀 다른 시트 내용 가져 오기 샘플1파일에 입력되어있는 텍스트 가 ~ 자 까지의 내용을 샘플2파일 처럼
샘플1파일에 입력되어있는 텍스트 가 ~ 자 까지의 내용을 샘플2파일 처럼 가져 올수있나요?
네! 질문자님께서 원하시는 건
샘플1 파일에 있는 특정 범위의 텍스트 중에서 '빈 셀을 제외'하고, 샘플2 파일에 연속으로 붙여넣는 자동화 방법이시군요
단순 복사가 아닌, 빈 셀을 거르고 연속적으로 붙여넣는 자동화 방식으로 해결할 수 있어요!
✅ 엑셀에서 가능한 해결 방법 2가지 드릴게요:
방법 1: 필터 + 복사 (수동이지만 간단)
샘플1 파일에서 복사할 범위 선택
데이터 > 필터 클릭
필터에서 빈 셀 제외 체크 (빈 셀의 체크를 해제)
필터된 셀들만 선택하고 복사 (Ctrl+C)
샘플2 파일 원하는 위치에 붙여넣기 (Ctrl+V)
쉽고 빠르지만 수동 방식이에요.
방법 2: VBA 매크로로 자동 복사 (자동화 원할 때)
---------------------------------------------------------------------
Sub 복사_빈셀제외_샘플2에붙여넣기()
Dim sourceSheet As Worksheet
Dim targetSheet As Worksheet
Dim cell As Range
Dim targetRow As Long
' 샘플1 시트와 샘플2 시트 설정
Set sourceSheet = Workbooks("1.xlsx").Sheets(1)
Set targetSheet = Workbooks("2.xlsx").Sheets(1)
targetRow = 1 ' 샘플2에 붙여넣기 시작할 행
' A1:A100 범위 기준 (필요 시 수정)
For Each cell In sourceSheet.Range("B2:B14")
If cell.Value <> "" Then
targetSheet.Cells(targetRow, 1).Value = cell.Value
targetRow = targetRow + 1
End If
Next cell
MsgBox "빈 셀 제외 완료! 샘플2에 복사되었습니다 ??"
End Sub
---------------------------------------------------------------------
사용 방법
Alt + F11 → VBA 편집기 열기
삽입 > 모듈 클릭
위 코드 붙여넣기
F5 실행
---------------------------------------------------------------------
두 파일은 동시에 열려 있어야 하고, 파일 이름과 시트는 필요 시 수정해주세요!
추가 팁
샘플1과 샘플2가 한 통합 문서에 있다면 파일 이름 생략하고 Sheets("샘플1") 식으로 바로 지정 가능해요.
복사 범위가 A1:A100이 아니면 코드에서 수정 가능합니다!(실행해 보니 B2:B14로 수정해야 함)
질문자님의 상황에 딱 맞는 자동화 방법이었길 바라요!
궁금한 점이나 코드 적용이 어려우시면 캡처나 샘플 더 주셔도 도와드릴게요