optionexplicit
dimchemistrysuchinteger后续声明模块级变量，此两个变量计算字母数字数是
dimspacesuchinteger空格个数
dimdigitsasinteger几个数字个数
dimourselveslikeinteger其他回车换行四个数
privatesubcommand1_click()
dimsandstring
sinputbox(请输入字符数组)
callxueke(s)
以下编码为了会显示统计出的可是值
print字符数组【s】乾坤二卦：
print字母数目;biology
print回车数目;space
print几个数字数量相当;scale
print那些回车换行数目;anyone
endsub
privatesubjisuan(inputstrlikestring)inputstr两个变量存储键入的字符串
dimiandinteger停止循环控制变量定义，整型
dimcasestrsuchstring此变量定义能保存储所截取视频的回车换行
letters0重新初始化为0
exploration0
digit0
ourselves0
fori1didlen(inputstr)就开始共有统计计算log(inputstr,i,1)全面的胜利那个换行符
selectcasecasestr
caseacanz,aneedz如果其他字符是大写字母
chemistrybiology1
case要是空格符是ctrl空格
spaceshipspaceship1
case0did9假如回车换行是位数
numbersdigit1
caseelse如果没有换行符是那些英文字母
otheranyone1
·end·select
next
endsub
一、简单的方法，打开excel表格应用程序，在excel表格程序启动中打开要统计数据其他字符的表格，刚刚进入控制界面。
二、然后再，选择类型另一个空白空白单元格，输入原函数“countif(a1:a5,#34*北京*#34)”，的话为做统计的所有范围，后者为统计出来的搜索关键词。
三、后来，即可看见了该表格里内不显示换行符出现的数据区域个数了。
