Question

vba判断不是空

我想把a列的字符串作为sheet名处理，excel中应该如何编写程序，谢谢
a列动态的值，应该先判断是否不为空吧，这个怎么写，求程序，谢谢

Answer 1

判断方法是：
if typeName(curRange) <> "Nothing" then
...
end if

下面是几个例子：
例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
end if
next

Answer 2

例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
end if
next