23、Excel VBA编程示例与技巧全解析

Excel VBA编程示例与技巧全解析

1. 范围判断与数据类型确定

在Excel VBA编程中，我们常常需要进行范围判断和数据类型的识别。

1.1 判断一个范围是否包含在另一个范围内

我们可以使用 InRange 函数来判断一个范围是否包含在另一个范围内。该函数接受两个 Range 对象作为参数，如果第一个范围是第二个范围的子集，则返回 True 。以下是具体的代码实现：

Function InRange(rng1, rng2) As Boolean
    ' Returns True if rng1 is a subset of rng2
    On Error GoTo ErrHandler
    If Union(rng1, rng2).Address = rng2.Address Then
        InRange = True
        Exit Function
    End If
ErrHandler:
    InRange = False
End Function

这个函数利用了 Union 方法，它返回一个代表两个 Range 对象并集的 Range 对象。如果两个范围的并集地址与第二个范围的地址相同，那么第一个范围就包含在第二个范围内。如果两个范围位于不同的工作表中， Union 方法会产生错误，此时