vba中一个单无格属于一个区域怎么表达

代码和测试结果如下：

Sub test()
Dim rg, rng As Range
Set rg = Range("Z4")
Set rng = Range("A1:C5")
If Application.Intersect(rg, rng) Is Nothing Then
    MsgBox " ä¸å±žäºŽ"
Else
    MsgBox "属于"
End If
End Sub

温馨提示：答案为网友推荐，仅供参考

当前网址：https://verywind.cn/ee/3e327xxvjx727rjexe.html