MsgBox"你有未填写的数据,请检查!"Sheets("sheet1").SelectEndIfEndSub这只是个意思当你点保存的时候会提示你有未填写的数据只有那些空格都不为空的时候才不提示……...
1.ALT+F11打开VB脚本编辑器2.双击thisworkbook3.贴上下面的代码PrivateSubWorkbook_SheetSelectionChange(ByValShAsObject,ByValTargetAsRange)tmp=Range("A8").ValueIfIsEmpty(tmp)ThenMsgBox"A8...
首先,需要使用VBA。其次,你要设定“完整”的含义。提醒一点:关键位置全部空白,也是完整的一种,不然,你首先自己就不能保存
这个是vba语句,要先打开开发工具,07版的office按钮-》excel选项-》常用-》在功能区显示开发工具选项卡(勾起来)-》开发工具选项卡-》visualbasic-》插入-》模块,然后就可以把你把代码放进去了。
二楼兄弟的方法不行吧~选中C列->右键->单元格式->保护->把锁定勾选去
PrivateSubWorkbook_BeforeSave(ByValSaveAsUIAsBoolean,CancelAsBoolean)IfSheet1.Cells(1,1)=""ThenMsgBox"单元格内容为必填!"Cancel=TrueEndIfEndSub...
If保存状态=1ThenCancel=FalseElse'注意必须保存第一列有数据,才能检测到必填写字段是否填写,如果不检测第一列可修改循环终值Lastrow=Sheets("入职资料").Range("A65536").End(xlUp).Row'MsgBox...
C1属性性别年龄2选择需要填写的区域B、C列点开“数据有效性”“设置”去掉“忽略控制”的勾选“有效性条件”选择“自定义”“公式”输入:=$A2<>""“出错警告”“错误信息'输入:请填写属性列……
5.检查磁盘空间:确保你的计算机硬盘上有足够的可用空间来保存文件。如果硬盘空间不足,可能会导致保存失败。6.禁用或卸载冲突的插件:如果你使用了Excel的插件或附加组件,有时这些插件可能导致保存问题。尝试禁用或卸载任何可能...
5、会打开excel2016的信任中心窗口,在这里点击左侧边栏的“隐私选项”菜单项。6、在右侧的窗口中我们找到并取消“保存时从文件属性中删除个人信息”前面的勾选,最后点击确定按钮就可以了,这样我们再编辑好文档的作者信息,就...