请教：

在选择不同行时，检查本行是否有空值。如果有空值，显示提示框，返回原来的行，空值单元格处于编辑状态。如果不为空，则锁定本行，选择新行。这段代码该怎么写？放到哪个表事件的过程里呢？

下面是我从帮助里面复制修改的代码，放在BeforeSelChange事件过程中。单击新增行，会弹出messagebox。求解！

+++++++++++++++++++++++++++++

\'如果没有输入编号列内容,则禁止选择其它行:
If e.Table.Current IsNot Nothing Then \'如果当前行是数据行,也就是Current属性不为空
    If e.Table.Current.IsNull("A") Or e.Table.Current.IsNull("B") Or e.Table.Current.IsNull("C") Or e.Table.Current.IsNull("D") Or _
       e.Table.Current.IsNull("E") Or e.Table.Current.IsNull("F") Or e.Table.Current.IsNull("G") Or e.Table.Current.IsNull("H") Or e.Table.Current.IsNull("I") Then \'如果A列为空
        If e.NewRange.RowSel <> e.OldRange.RowSel Then \'而且即将选择另一行
            e.Cancel = True \'那么取消操作
            messagebox.show("请检查各项是否有空值,请重新输入!","提示")
            Tables("用户列表").Current.Locked = False
       End If
     Else
       Tables("用户列表").Current.Locked =True

    End If

End If

意思是换行前，选定行的所有列，都必须输入内容？

是的，请指点啊，谢了。

下载下来学习下，谢谢！