728x90
여러분
오늘 회사에서 일하다가
엑셀에서
'데이터를 붙여 넣을 수 없습니다.'
'셀 서식이 너무 많습니다.'
라는 메세지가 나온 겁니다.
회사에서 엑셀을 사용하다 보면
이사람 저사람 작성된 엑셀파일을
붙여넣고 또 붙여넣고
그럴일이 참 많죠
불필요한 서식이 많이 누적된 겁니다.
방법은 두가지 입니다.
다른 곳 보니까 뭐 다른 앱
설치하고 그래야 한다고 하는데
저는 삭제했습니다.
아래와 같이 서식을 전부 삭제해도 되는데
일이 너무 많죠 ㅠ
각설하고 매크로 사용합시다.
ALT + F11
누르세요
그러면 아래와 같이 매크로 창이 뜹니다.
풀다운 매뉴에서
삽입 -> 모듈 누르면
이런 창이 뜹니다. 여기에다가
아래 텍스트 복사해서
붙여넣기 하시고
F5 키 누르세요.
그럼 꽤 오래 걸립니다. 10분? 정도
(복사하실 때 출처가 나오면 지워주세요.)
Sub 셀스타일삭제()
Dim 스타일 As Style
Dim 개수 As Long
For Each 스타일 In ActiveWorkbook.Styles
If 스타일.BuiltIn = False Then
On Error Resume Next
스타일.Delete
개수 = 개수 + 1
On Error GoTo 0
End If
Next
MsgBox 개수 & "개의 불필요한 셀 스타일 제거 완료"
End Sub
완료! ㅋ
엑셀을 잘써야 야근안합니다. 여러분 ㅠㅠ
나름 꿀팁을 전달하고 가니
도움이 되길 바라겠습니다.
728x90