没有现在的这个功能,不过用变通的办法,可以实现,不过任何手段都是可以被破解,只能说防不熟悉VBA的人可以,先需要下载安装VBA for wps,安装完毕后,按ALT+F11弹出VBA编辑器
然后双击左边的Thisworkbook,把以下代码复制进去:
Const pw = "123456"
'数字123456是默认的密码,根据个人修改
Const 使用时间 As Date = "2014-7-10 23:59:59"
'后面的日期和时间请根据需要修改
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If Now > 使用时间 Then
For Each sht In ThisWorkbook.Sheets
If Not sht.ProtectContents Then
sht.Protect Password:=pw, DrawingObjects:=True, Contents:=True, Scenarios:=True
sht.EnableSelection = xlNoSelection
End If
Next
If Not ThisWorkbook.Saved Then ThisWorkbook.Save
Else
For Each sht In ThisWorkbook.Sheets
If sht.ProtectContents Then sht.Unprotect Password:=pw
Next
End If
End Sub
防止别人对这些代码进行更改或删除,在VBA编辑器菜单上点->工具->VBProject属性->"保护"选项卡里设置密码以及勾选"查看时锁定工程".
上面的代码大概功能:
每次激活任意的工作表时,判断当前日期是否超过2014-7-10 23:59:59,如果超过这个时间,把所有的工作表都设置为保护状态,不能进行编辑复制等等操作,只能看不能用
使用一天是什么意思啊?锁定又是什么意思?