NO.1

Excel表格查找有一个Find方法，此方法是针对单元格值进行条件查找，那么有这样一种需求：要查找为空单元格，或者包含有公式的单元格，如何来进行。

既然有需求，那么就会有方法，这就是Excel强大的一个体现。

接下来介绍一个方法，直接查找相关条件的单元格出来。

NO.2

想要完成上述功能，用到Range对象的SpecialCells方法。

具体语法和参数如下图介绍：

图中已经说明很清楚，以什么样的条件进行查找，返回是一个Range对象。

也就是说找到之后，对Range这个对象进行处理就可以达到我们的目的。

比如找出A1：C100区域内空的单元格，然后设置背景颜色为红色。

Dim R as Range

set R=Range("A1:C100").SpecialCells xlCellTypeBlanks

With R

.Interior.Color = RGB(222, 1, 1)

Wnd With

NO.3

有空上方法来操作，那么对一些特殊表格进行的操作就显得相对简单了。

下面做了一个简单例子，对不同条件进行查找。

其实这个例子没有给出特定需要，所以做了一个下拉框，把所有可选择的条件都加进去，可以任意选择。

本例也没有实际使用意义，我只抛砖，能不能引来玉，因人而异了。

代码如下 ：

Private Sub CommandButton1_Click()

Dim xType As Variant

xType = Me.ComboBox1.Value

Dim R As Range

If VBA.Len(xType) = 0 Then Exit Sub

With Selection

Set R = .SpecialCells(xType, xlTextValues)

If R Is Nothing Then Exit Sub

With R

MsgBox "数据区域：" & .Address

End With

End With

End Sub

NO.4

Excel重点解决二维表问题，这方面给我们提供了许多方便使用的方法，简单来讲，只需要保持一种拿来主义就可以，完全可以达到自己的。

但是这也是一种没办法改变的现实，VBA已经超出二维表的一些基本功能，达到了一种超级万能的境界。所以，拿来主义也只是一种浮浅的学习阶段，如果有必要，还是掌握一些VBA基础功能如何进行处理，无论什么软件，都离不开构建代码的方法，如果对方法有深入理解，那么在进一步操作应用的时候，就简单多了。

---END---

欢迎关注、收藏

Tags：subcommand