Excel一键计算所选区域单元格中包含字符的个数

1、本教程以下列数据为例。

2、插入一个形状，作为控制代码按钮。

3、按下快捷键Alt+F11进入VBA窗口。PS：其他进入VBA的方式可以参考以下链接：

4、进入VBA窗口后，插入一个模块，具体操作方式，如图所示。

5、在模块窗口复制粘贴以下代码：Sub Number()Dim m%, n%, k%, s%Dim rng As RangeSet rng = SelectionFor Each rng In Selection m = Len(rng) n = LenB(rng) k = n - m s = s + kNext MsgBox sEnd Sub

6、关闭VBA窗口，回到Excel界面，然后为步骤2中绘制的形状指定宏。

7、先框选单元格区域，然后点击形状即可计算该区域所含字符个数。