엑셀 스타일 삭제 매크로 - egsel seutail sagje maekeulo

그중 "셀 서식이 너무 많습니다"라는 에러는 엑셀을 주로 사용하는 사무직 분들은 한번 이상은 경험할 정도로 발생 빈도가 높은 에러이지만, 해결하기는 더더욱 번거로운 엑셀의 암적인 에러라고 볼 수 있습니다.

이 에러는 한 개의 엑셀 파일을 데일리로 누적하여 사용할 경우 자주 발생하게 되는데요.

데이터를 입력할때나 지울 때 표를 만들거나 지울 때 등 엑셀을 사용하면서 발생하는 로그기록들이 쌓여서 발생하는 에러입니다.

셀 서식 에러를 해결하는 방법은 "직접 수동으로 지우는 방법"과 "VBA를 활용한 매크로 제작으로 지우는 방법"으로 크게 두 가지로 나뉠 수 있습니다.

셀 서식 에러가 발생할 정도면 엄청난 로그기록이 있을 것이 예상되므로 수동으로 지우는 방법은 추천드리지 않습니다만 VBA나 매크로 기능에 대해 잘 모르시는 분들을 위해 둘 다 예시를 들어보겠습니다.

반응형

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

Sub DeleteAllStyles()

    Dim stlStyle As Style

    Dim I

    I = 0

    On Error Resume Next

    For I = 0 To 402

        ActiveWorkbook.Styles.Item(I).Delete

    Next

    MsgBox ActiveWorkbook.Styles.Count

End Sub

Colored by Color Scripter

반응형

공유하기

게시글 관리

저작자표시

• 카카오스토리
• 트위터
• 페이스북

'개발 > 기타' 카테고리의 다른 글

셀스타일 전부 삭제하기

가끔 지저분하게 셀스타일이 설정되어 있는 문서가 있다.

지워보자.

VBA로 지우기

VBA로 지워도 되는데, 셀스타일 이름이 거지같이 되어있는 경우, 삭제도 되지 않는다.

매우 비추하는 방법이다.

XML파일 편집해서 지우기

이 방법이 가장 명쾌한 방법이다.

XLSX파일이 압축파일이라는건 웬만하면 알고 있을 것이다.

ZIP파일로 확장자를 바꾼다.

압축을 풀고 XL폴더에 있는 STYLE 파일을 수정한다.

메모장이나 코드편집기를 써서 XML 파일을 열어준다.

코드의 태그중 <CELLSTYLE> </CELLSTYLE>안에 있는 코드를 모두 지워준다.

폴더를 다시 압축해주고, 확장자명을 XLSX로 변경해준다.

기본 셀스타일만 남고 모두 삭제되었다.

끝.

공유하기

게시글 관리

저작자표시 비영리 변경금지

'OFFICE LIFE' 카테고리의 다른 글