How to check if a cell value is Chinese text in Excel
You can try to use regular expression to test the cell characters. The code below test the characters. If they are found on the CJK Unicode Tables. If found, they must be chinese.
Function IsChinese(myname As Range)
Dim myregex As New RegExp
myregex.Pattern = "[\u4E00-\u9FFF]+"
IsChinese = myregex.Test(myname.Value)
End Function