글자 크기, 색상또는 기타서식을 바꿀경우, “셀서식이 너무많습니다”. 라는 메시지가 뜨면서 서식이나 글꼴 색상을 바꿀 수 없습니다.

Question

글자 크기, 색상또는 기타서식을 바꿀경우, “셀서식이 너무많습니다”. 라는 메시지가 뜨면서 서식이나 글꼴 색상을 바꿀 수 없습니다.

Answer 1

안녕하십니까? 장태훈님

Microsoft Office의 Excel 사이트를 방문해 주셔서 감사합니다.

문의 하신 Excel에서 "셀 서식이 너무 많습니다."라는 오류 메시지가 발생하고 셀 서식이 변경되지 않는 문제에 대한 답변을 드리겠습니다.

Excel에서 셀 서식이 너무 많은 경우에도 발생할 수 있지만, 바이러스나 악성 코드 등의 영향이나, 시스템 리소스 부족 등의 문제로도 발생할 수 있습니다.

1. 바이러스 검사

(기존에 설치되어 있는 백신 프로그램이 있다면, 시스템 전반에 걸친 바이러스 및 악성코드 검사를 받아 보시기 바랍니다.)

(설치된 백신 프로그램이 존재하지 않는다면, Microsoft에서 무료로 제공하는 Microsoft Security Essentials을 이용해 보시기 바랍니다)

(http://www.microsoft.com/downloads/details.aspx?FamilyID=e1605e70-9649-4a87-8532-33d813687a7f&DisplayLang=ko) 2. 타사 프로그램과 충돌 - 문서 보안 프로그램(Fasoo.com, McAfee, Document-Safe, SoftCamp...)이 설치되어 있는 경우 제거하시기 바랍니다.

a. 윈도우 시작 버튼을 클릭합니다.

b. 윈도우 시작 메뉴 중 실행을 선택합니다.

c. 좌측 하단에 실행창이 나타나면, [msconfig]를 입력합니다.

d. 시스템 구성 메뉴가 나타나면, 서비스 탭의 [모든 Microsoft 서비스 숨기기]를 체크하고 [모두 사용 안 함] 버튼을 선택합니다.

e. 시작 프로그램 탭의 [모두 사용 안 함] 버튼을 선택합니다.

f. 시스템 설정이 완료되면, 시스템을 Reboot합니다.

3. 레지스트리 초기화

a. 윈도우 시작 버튼을 클릭합니다.

b. 윈도우 시작 메뉴 중 실행을 선택합니다.

c. 좌측 하단에 실행 창이 나타나면, [regedit]를 입력합니다.

d. 레지스트리 편집기가 실행되면, 해당 폴더로 이동합니다.

(HKey_Current_User\Software\Microsoft\Office\12.0\Excel)

(HKey_Local_Machine\Software\Microsoft\Office\12.0\Excel)

e. 해당 폴더를 선택한 후 마우스 우측 버튼을 클릭하여, [내보내기]를 통해 레지스트리를 백업합니다.

f. 백업이 완료되면, 다시 마우스 우측 버튼을 클릭하여, [삭제]를 통해 레지스트리를 제거합니다.

g. 레지스트리 편집기를 종료하고, Excel프로그램을 실행하여 레지스트리를 초기화합니다. 4. 매크로를 이용한 셀 서식 삭제

a. 해당 Excel 파일을 실행합니다.

b. Office 단추를 클릭하여 [Excel 옵션]을 선택합니다.

c. 옵션 메뉴가 나타나면, 기본 설정 탭의 [리본 메뉴에 개발 도구 탭 표시]를 선택합니다.

d. Excel 기본 메뉴에 개발 도구가 나타나면, [Visual Basic Editer]를 선택합니다.

e. Visual Basic이 실행되면 삽입 탭의 [모듈]을 선택하여 해당 내용을 입력합니다.

---

Sub DeleteNames()

Dim n As Name

Dim lngCount As Long

On Error Resume Next

lngCount = ThisWorkbook.Names.Count

For Each n In ThisWorkbook.Names

    n.Visible = True

    n.Delete

Next n

MsgBox "총 " & lngCount & "개의 [이름] 중, " & lngCount - ThisWorkbook.Names.Count & "개의 [이름] 삭제 완료."

End Sub

Sub DeleteStyles()

'/ 첫번째 스타일이 삭제가 되지 않을 때 진행되지 않는 문제로

'/ 마지막 스타일부터 삭제하는 방식으로 수정 (2009-11-20)

Dim lng As Long

Dim lngCount As Long

lngCount = ThisWorkbook.Styles.Count

On Error Resume Next

For lng = ThisWorkbook.Styles.Count To 1 Step -1

    ThisWorkbook.Styles(lng).Delete

Next lng

MsgBox "총 " & lngCount & "개의 [스타일] 중, " & lngCount - ThisWorkbook.Styles.Count & "개의 [스타일] 삭제 완료."

End Sub

---

f. 해당 모듈을 실행(F5)하고 매크로를 실행하여 해당 파일의 셀을 전부 삭제합니다.

[참고 자료]

http://support.microsoft.com/kb/601085/ko

제가 문제에 대해 더 알아야 할 것이 있다면 응답 주시면 감사하겠습니다.

제시해 드린 답변이 도움이 되었기를 바랍니다.

Answer 2

Excel 매크로에서는 손상된 스타일과 손상되지 않은 스타일을 구분할 수 없기 때문에 안타깝지만 통채로 제거해 주셔야 합니다.

수동으로 제거시 필요한 스타일은 남겨 놓을 수 있지만 자동 제거 툴을 사용하는 것이라면, 전체 서식 제거 후 다시 만들어서 사용하시기를 권장 드립니다.

감사합니다.

Answer 3

알려주신 내용 매우 유용하게 잘 쓰고 있습니다.

다만 6번의 visual basic 방법으로 적용하면, 홈탭의 표시형식에 있는 스타일들이 다 사라져 버립니다.

이부분만 좀 수정되면 하고 바랍니다.

감사합니다.