例1:
If Cells(1,1).value<>"" then '颂伍如果A1不为空野誉或,第一虚掘个工作薄的名称是A1单元格的值
SHEETS(1).name=cells(1,1).value
end if
也可以加一个循环,直到找到A列不为空的单元格
例2:
dim x as range
for each x in range("A1:A65536")
if x.value<>"" then
sheets(1).name=x.value
exit for
next
判断方法是：
if typeName(curRange) <> "Nothing" then
...
下面是几个例子：
If Cells(1,1).value<>"" then '如果蚂虚A1不为空,第指物态一个工作薄的名称是A1单唯源元格的值
何谓数组为空?
Private Function IsArrayEmpty(Arr As Variant) As Boolean
On Error Resume Next
Dim U, E
U = UBound(Arr)
E = Err.Number
Err.Clear
If E = 13 Then
IsArrayEmpty = 1'Empty
Else
IsArrayEmpty = 0'No Empty
End If
End Function
如ARR为数组的话
IF arr is nothing then
Private Declare Function SafeArrayGetDim Lib "oleaut32.dll" (ByRef saArray() As Any) As Long
sub test
旁拍 0, "数组不为空!", "数组为卖启孝空!"中稿)
end sub
以上就是土嘎嘎小编大虾米为大家整理的vba判断变量是否为空_vba,如何判断数组是否为空相关主题介绍,如果您觉得小编更新的文章对您有所帮助，不要忘记讲本站分享给您身边的朋友哦！！