Sheets(1).Cells(1, 1).Resize(6, 12).Copy Sheets(2).Cells(1, 1).Resize(6, 12)
첫번째 시트의 첫번째 셀부터 6행(1,2,3,...) 12열(A,B,C,...)만큼 복사후 2번째시트의 첫번째 셀로부터 6행 12열만큼 붙여 넣는다.
Worksheets("Sheet1").Cells(1, 1).Resize(6, 12).Copy Worksheets("참조").Cells(1, 1).Resize(6, 12)
WorkSheets("셀이름") 으로 표현할 수 있다.
Worksheets("Sheet1").Range("A1:L6").Copy Worksheets("참조").Range("A1")
Range("시작행렬:끝행렬") 형식으로 사용가능하다.
Range("A1") 은 A1 셀부터 시작된다.
위 모두 결과는 같음
'Office Tutorials > Excel' 카테고리의 다른 글
| [EXCEL VBA] Split를 이용한 문자열 구분자로 나누기, 사용자정의 함수(function) [펌] (0) | 2013.10.23 |
|---|---|
| [EXCEL] IFERROR - 오류 발생시 지정값으로 반환 (0) | 2013.10.22 |
| [Excel VBA] 선택열 각 행 값으로 메일 작성하기 (0) | 2013.02.13 |
| [Excel VBA] 특정시트를 새문서로 만들어 저장후 메일로 발송하기 (0) | 2013.01.03 |
| [엑셀VBA] 워크북의 여러 시트중 특정 시트만 새 워크북 만들기 (0) | 2012.04.10 |
| [엑셀VBA] 엔터 입력으로 하이퍼링크 삭제하고 다음셀(우측)로 이동하기 (0) | 2012.04.09 |
| [엑셀VBA] 하이퍼링크 제거 (휘발성) (0) | 2012.04.09 |
| [엑셀VBA] 워크북의 여러 시트중 특정 시트만 새로운 워크북으로 만들기 (0) | 2012.03.28 |