VBA转VSTO：一键打造独立Excel插件
Sub PDF防复制设置提示() Dim msg As String msg = "【终极防复制：PDF禁止复制（防截图OCR）设置步骤】" & vbCrLf & vbCrLf & _ "1. 先将当前 Word 文档手动导出为 PDF 文件" & vbCrLf & _ "2. 用 Adobe Acrobat 打开该 PDF" & vbCrLf & _ "3. 点击【工具】→【保护】" & vbCrLf & _ "4. 选择【加密】→【用密码加密】" & vbCrLf & _ "5. 勾选【限制编辑和打印】，设置权限密码" & vbCrLf & _ "6. 【内容复制】选择【不允许复制】" & vbCrLf & _ "7. 确定保存，完成防复制设置" & vbCrLf & vbCrLf & _ "说明：此设置可禁止文本复制，增强防 OCR 效果。" ' 弹出提示框 MsgBox msg, vbInformation, "PDF防复制设置指引" End SubVBA 如何变成加载项（永久可用）
VBA 如何转成 VSTO 插件（独立安装、不依赖文档）
一、VBA 变成【Excel 加载项】（永久生效）
作用
把 VBA 代码变成Excel 启动就自动加载的插件，任何工作簿都能用。