For Each r As Row In Tables("Product_List.ProductionCheck_List.工序表").Rows
If r("排序") = "9999" Then
MessageBox.Show("保存失败!请修改'排序'列内容")
Return
Else
Tables("Product_List.ProductionCheck_List.工序表").Save
MessageBox.Show("保存成功")
End If
Next
想实现一下功能:
如果有排序列为9999不保存表,但是为什么排序列为9999时,仍然能保存上呢?请指点,谢谢