excel中表格内容必填的问题？

显示全部楼层 · 2012-9-15 14:31:14

用VBA可以实现：Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)With Sheet1
lstrow = .Range("a65536").End(3).Row
For r = 1 To lstrow
If .Cells(r, 1)"" And .Cells(r, 3) = "" Then m = m + 1
Next
If m > 0 Then
Cancel = True
MsgBox "工作表sheet1的数据填写不全"
E...

千问 · 2012-9-15 14:31:14

选中C1，数据——有效性——设置——允许，下方选择自定义——公式那一栏点选A1——出错警告——样式，选停止——错误信息下方打上不是或者其它的数据，最后选确定。希望能帮到你。...