<값만 복사>
.PasteSpecial XlPasteValues
<수식만 복사>
.PasteSpecial XlPasteFormulas
<서식만 복사>
.PasteSpecial XlPasteFormats
Sub copy_all()
Range("a1").CurrentRegion.copy
Range("j1").PasteSpecial
'셀.CurrentRegion: 셀부터 이어져있는 전체 범위
End Sub
Sub copy_all()
Range("j1").CurrentRegion.Clear
'j1셀부터 전체 표 범위를 지우기
Range("a1:H10").copy
Range("j1").PasteSpecial
'a1:H10까지만 복사해서 j1에 붙여넣기 F8눌러 한줄씩 실행해 보기
End Sub
Sub copy_all()
Range("j1").CurrentRegion.Clear
'j1셀부터 전체 표 범위를 지우기
Range("a1:H10").copy
Range("j1").PasteSpecial
'a1:H10까지만 복사해서 j1에 붙여넣기 F8눌러 한줄씩 실행해 보기
Range("a1").Select
Application.CutCopyMode = False '복사모드취소
End Sub
합을 구하는 수식(H3)과
평균을 구하는 수식(I3)을
복사 붙여넣기 하면 H7:I7과 같이 서식이 변경됨
이럴때 수식만 복사