作者：乔山办公网日期：
返回目录：excel表格制作
Len函数是返知回字符个数，结果道是自然数，所以所内有的都满足<>""。就改容为，以下几种：
If Len(Sheets("sheet1").Cells(i, 10)) <> 0 Then
If Sheets("sheet1").Cells(i, 10) <> "" Then
If not istmpty(Sheets("sheet1").Cells(i, 10)) Then
输入一下程序判断选中的单元格是否为空单元格
Sub n（）
If Selection.Value = Then
MsgBox
Else
MsgBox
End If
End Sub
扩展资料：复
VBA主要能用来扩展Windows的应用程序功能，特别是Microsoft Office软件。也可说是一种应用程式视觉化的Basic 脚本制。
该语言于1993年由微软公司开发的的应用程序共百享一种通用的自动化语言--------Visual Basic for Application(VBA)，实际上VBA是寄生于VB应用程序的版本。
掌握了VBA，可以发挥以下作用：
1.规范用户的操作，控制用户的操作行度问为；
2.操作界面人性化，方便用户的操作；
3.多个步骤的手工操作通过执行VBA代码可以迅速的实现；
4.实现一些答VB无法实现的功能。
5.用VBA制做EXCEL登录系统。
参考资料来源：百度百科-VBA
比如判断A1单元格是否为空：
if isempty(range("A1")) then
…………
当A1为空是条件满足
VBA判断单元格为知空，可以使道用版Range(...)=""，例如：
IF RANGE("A1")="是" THEN
FOR EACH t IN ARRAY("B1","C2",D4")
IF RANGE(t)="" THEN MSGBOX "你"& t &"格内容权未填"
NEXT t
END IF