excel表格数据未正确填写不能保存？
2021-07-24
你的这个需求 可能需要用到VBA了…… thisworkbook 工程中 Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) n = Application.WorksheetFunction.CountA(Sheets("sheet1").Range("a2:d4,a5:b5")
) If n < 14 Then MsgBox "你有未填写的数据，请检查！" Sheets("sheet1").Select End If End Sub 这只是个意思 当你点保存的时候 会提示你有未填写的数据 只有那些空格 都不为空的时候 才不提示……
大家都在看
本站系本网编辑转载，转载目的在于传递更多信息，并不代表本网赞同其观点和对其真实性负责。如涉及作品内容、版权和其它问题，请在30日内与本网联系，我们将在第一时间删除内容！本站文章版权归原作者所有，内容为作者个人观点。本站只提供参考并不构成任何投资及应用建议。本站拥有对此声明的最终解释权。