파이스님..

엑셀의 기본 기능에 그런 기능을 본 기억은 없네요..

아무래도 VBA로 카운트를 해야할 것 같아서 간단히 만들어보았습니다.

'### 숫자와 수식을 제외한 텍스트 셀을 카운트하는 프로시저.

'### Created by abyul.com 2013.05.27

Sub abCountTextInWB()

    Dim lCntCells As Long

    Dim lCntChar As Long

    Dim ws As Worksheet

    Dim rTarget As Range, c As Range

    For Each ws In ActiveWorkbook.Worksheets

        Set rTarget = ws.UsedRange

        On Error Resume Next

        Set rTarget = rTarget.SpecialCells(xlCellTypeConstants, 2)

        If Err.Number <> 1004 Then

            For Each c In rTarget

                lCntCells = lCntCells + 1

                lCntChar = lCntChar + Len(c)

            Next c

        Else

            On Error GoTo 0

        End If

    Next ws

    MsgBox "The count of cells is " & Format(lCntCells, "#,###") & vbNewLine & _

            "The count of characters is " & Format(lCntChar, "#,###")

End Sub

위 코드를 복사한 다음..

Alt+F11눌러 VBE창을 띄우고..

메뉴에서 삽입 > 모듈하시고.. 복사한 코드를 붙여넣으세요..

그런 다음.. Alt+F11눌러서 엑셀로 돌아오시고..

Alt+F8을 눌러 매크로 실행창을 띄우시고..

"abCountTextInWB"를 선택하고.. 실행을 누르시면 아래와 같은 메시지로 결과를 알려줍니다.

도움이 되셨기를..

오옷..이렇게 빠른 답변을! 아별님 감사합니다. 알려주신대로 해보고 후기 올리도록 하겠습니다.

며칠 계속 비 많이 온다는데 감기 조심 하십시오. ^^

우와! 너무 신기하네요. 신기할정도로 잘 작동하였습니다. + +

편집창에서 바로 f5로 실행했더니 결과가 딱딱 바로바로 잘 뜨더라고요!

근데 파일이 많을 경우에는 기본서식(엑셀파일단?)에 이 프로시저를 심어두고 그러니까,

새로운 파일을 열때마다 위 프로시저를 복사해서 붙여넣을 필요없이 왜 그....

비베창에서 선택만 하면 되도록 저장해 놓는 방법도 있지 않나요? (예전 분명히 이것을 알았었는데...ㅠ.ㅠ..)

아무튼 정말 감사합니다. 고민 해결 되었습니다! 비가 추적추적오는 날씨지만 기분좋은 하루 보내십시오!