如何限制WORD文档的使用期限或打开次数呢？

Posted 2023-04-15

参考技术A

1、首先打开需要编辑的Word文档，点击打开主菜单栏中的“开发工具”。

2、然后在弹出来的窗口中点击打开“Visual Basic”。

3、然后在弹出来的窗口中点击输入代码：

Private Sub Document_Open()

    Dim Wscpt As Object, OldCount As Byte, NowCount As Byt

        On Error Resume Next

    Set Wscpt = CreateObject("WScript.Shell")

    OldCount = Wscpt.RegRead("HKEY_CLASSES_ROOT\\Counter\\Reger")

    Wscpt.RegWrite "HKEY_CLASSES_ROOT\\Counter\\Reger", OldCount + 1, "REG_SZ"

    NowCount = Wscpt.RegRead("HKEY_CLASSES_ROOT\\Counter\\Reger")

    If Err.Number <> 0 Then MsgBox "注册表被锁定，无法执行本程序": GoTo closes

    If NowCount * 1 > 3 Then

closes:

    With ThisDocument

            .Saved = True

            .Close False

        End With

    End If

End Sub

4、然后点击上方绿色的按钮运行就完成了。打开文档超过3次，将无法再次打开文档。

如何免费将超过100兆的扫描PDF转换Word？

有时为了方便资料保存一般都会通过扫描或拍照的方式比较快速，但是这样处理保存的PDF文档修改起来就比较困难而且都比较大，经常会超过100兆。有没有免费的方法将这种PDF转换成Word呢？

目前市面上的客户端工具都是收费的，在线转换的免费工具相对多，但都有大小限制。这种超过100兆的PDF扫描文档可以使用speedpdf在线转换工具来处理。

首先搜索speedpdf后打开这个在线工具官网首页，选择页面推荐转换格式第一个PDF to Word即可。

一般谷歌或360等浏览器都有翻译功能，在网页任意处右击选择将其翻译成中文简体即可。

接着进入转换页面，根据页面提示上传需要转换的PDF文档后，点击下方列表对应文档进度条后的转换即可开始转换；

这种大文档转换会相对慢一些，转换期间不要刷新页面，耐心等待一会，转换完成后点击下载即可查看转换后的Word。