公式法：
可使用如下函数对其字符数和字节数进行判定（A1为字符串地址）。
=LEFT(A1,LENB(A1)-LEN(A1))
备注：
如果后面还有汉字，将无法达到目标；
如果其中包含全角的非汉字字符，也无法达到目标。
VBA法
可使用如下VBA操作，使用CC函数即可。以上问题也不存在。
On Error Resume Next
Dim i As Single
For i = 1 To Len(myRange)
If Asc(StrConv(Mid(myRange, i, 1), vbNarrow)) > 0 Then
Exit For
End If
Next
CC = Left(myRange, i - 1)
End Function
