随着手机里面功能越来越丰富，让我们使用起来越来越方便了，给我们的生活带来了极大的便利。怎样使用VBA统计选区中不重复数据个数？工具/原料more手机方法/步骤1/5分步阅读

首先在开发工具中打开VBA编辑器

2/5

在单元格区域当中输入一些内容作为例子

3/5

在VBA编辑器中插入模块

4/5

在模块当中输入如下代码，然后运行

Sub 不重复数据个数() Dim a As String, b As Integer, rng As Range a=, For Each rng In Selection 遍历整个区域 If InStr(a, , rng ,)=0 Then 如果在变量a中未找到单元格的值加前缀后缀 b=b+1: a=a rng , 那么累加计数器，同时重定义变量a End If 下一个 Next MsgB

5/5

选择所有区域B3:B13及D3:D13，用快捷键Alt+F8调出运行宏窗口，然后单击执行按钮，将弹出选区中不重复值个数之对话框

注意事项

智能手机助理给我们的生活带来了极大的便利！