Character count in Excel?

[Murgi]

How to perform a character count in Excel?
I receive sometimes jobs where I have to translate sentences in cells while
overwriting the source text.
The Excel file also includes a number of "text boxes".
When I copy the Excel file into MS Word, normal text is copied, but the text
within the text boxes is not.

Is there a way to get a total character count directly in Excel, or is there
a trick to copy everything into MS Word for a proper count?
If this doesn't work, is there some software that will make proper counting
possible?

 

[BrianB]

This should give you a basic count :-

'------------------------------------------------
Sub CHARACTER_COUNT()
Dim SheetCount As Long
Dim BoxCount As Long
Dim ws As Worksheet
'------------------------
Set ws = ActiveSheet
BoxCount = 0
For Each tb In ws.TextBoxes.ShapeRange
x = tb.TextFrame.Characters.Count
BoxCount = BoxCount + x
Next
'-----------------------
SheetCount = 0
For Each c In ws.UsedRange.Cells
SheetCount = SheetCount + Len(c.Value)
Next
'-----------------------
MsgBox (BoxCount + SheetCount)
End Sub
'-------------------------------------------------------------

 

[Murgi]

This should give you a basic count :-

'------------------------------------------------
Sub CHARACTER_COUNT()
Dim SheetCount As Long
Dim BoxCount As Long
Dim ws As Worksheet

I want to count everything in one go...

The following company has a program which can count everything... exept
textboxes.
The company told me that it is now working on an integration of a textbox
count function for Excel and Powerpoint files.

 

[Murgi]

The following company has a program which can count everything... exept

textboxes.
The company told me that it is now working on an integration of a textbox
count function for Excel and Powerpoint files.

Ooops... I forgot to paste the company's URL:

http://www.apluscounts.com/freeware.html