PPT作者信息如何锁定？如何防止修改？

　　在当今信息时代，PPT（PowerPoint）作为一种演示文稿工具，被广泛应用于各种场合。然而，由于PPT的易修改性，如何锁定作者信息以及防止他人随意修改PPT，成为了一个亟待解决的问题。本文将从PPT作者信息锁定和防止修改两个方面进行详细阐述。

　　一、PPT作者信息锁定

　　1. 设置PPT保护密码

　　在PowerPoint中，可以通过设置保护密码来锁定作者信息。具体操作如下：

　　（1）打开PPT文件，点击“文件”菜单，选择“信息”。

　　（2）在“文件属性”中，找到“高级属性”按钮，点击进入。

　　（3）在弹出的“高级属性”对话框中，切换到“摘要信息”选项卡。

　　（4）在“作者”栏中输入你的姓名，然后点击“确定”按钮。

　　（5）返回“文件属性”对话框，点击“应用”按钮，再点击“确定”按钮。

　　（6）在弹出的“设置密码”对话框中，输入并确认密码，点击“确定”按钮。

　　（7）在弹出的“确认密码”对话框中，再次输入密码，点击“确定”按钮。

　　（8）此时，你的PPT作者信息已被锁定，他人需要输入密码才能修改。

　　2. 使用宏锁定PPT

　　（1）打开PPT文件，点击“开发工具”选项卡。

　　（2）在“代码”组中，点击“Visual Basic”按钮，进入VBA编辑器。

　　（3）在弹出的VBA编辑器中，插入一个新模块，并输入以下代码：

　　Sub LockPresentation()

　　Dim sPassword As String

　　sPassword = "yourpassword"

　　If Not ActivePresentation.SlideShowSettings.LockShow Then

　　ActivePresentation.SlideShowSettings.LockShow = msoTrue

　　ActivePresentation.SlideShowSettings.LockSlideShow = msoTrue

　　ActivePresentation.SlideShowSettings.LockNotes = msoTrue

　　ActivePresentation.SlideShowSettings.LockHandouts = msoTrue

　　ActivePresentation.SlideShowSettings.LockView = msoTrue

　　ActivePresentation.SlideShowSettings.LockWindow = msoTrue

　　ActivePresentation.SlideShowSettings.LockPointer = msoTrue

　　ActivePresentation.SlideShowSettings.LockSlideShow = msoTrue

　　ActivePresentation.SlideShowSettings.LockNotes = msoTrue

　　ActivePresentation.SlideShowSettings.LockHandouts = msoTrue

　　ActivePresentation.SlideShowSettings.LockView = msoTrue

　　ActivePresentation.SlideShowSettings.LockWindow = msoTrue

　　ActivePresentation.SlideShowSettings.LockPointer = msoTrue

　　ActivePresentation.SlideShowSettings.LockShow = msoTrue

　　MsgBox "Presentation is locked."

　　Else

　　MsgBox "Presentation is already locked."

　　End If

　　End Sub

　　（4）将“yourpassword”替换为你设置的密码。

　　（5）关闭VBA编辑器，返回PPT界面。

　　（6）点击“开发工具”选项卡，选择“宏”，然后点击“运行”。

　　（7）在弹出的“运行宏”对话框中，选择“LockPresentation”，点击“确定”按钮。

　　此时，你的PPT作者信息已被锁定，他人需要输入密码才能修改。

　　二、如何防止修改PPT

　　1. 设置PPT密码

　　在设置PPT作者信息锁定的同时，可以设置PPT密码，防止他人随意修改。具体操作与设置作者信息锁定密码相同。

　　2. 使用数字签名

　　（1）打开PPT文件，点击“文件”菜单，选择“信息”。

　　（2）在“文件属性”中，找到“数字签名”按钮，点击进入。

　　（3）在弹出的“数字签名”对话框中，选择“添加数字签名”，点击“确定”按钮。

　　（4）按照提示操作，完成数字签名。

　　此时，你的PPT已添加数字签名，他人修改后无法通过数字签名验证。

　　3. 使用PDF格式

　　将PPT转换为PDF格式，可以有效地防止他人修改。具体操作如下：

　　（1）打开PPT文件，点击“文件”菜单，选择“另存为”。

　　（2）在“另存为”对话框中，选择“PDF或XPS文档”格式。

　　（3）在弹出的“导出PDF或XPS文档”对话框中，点击“创建PDF/XPS”。

　　（4）完成转换后，你的PPT已转换为PDF格式，他人无法修改。

　　相关问答

　　1. 如何在PPT中设置作者信息？

　　答：在PowerPoint中，可以通过设置保护密码或使用宏锁定PPT来设置作者信息。

　　2. 如何防止他人修改PPT？

　　答：可以通过设置PPT密码、使用数字签名或转换为PDF格式来防止他人修改PPT。

　　3. 如何在VBA中设置PPT作者信息？

　　答：在VBA编辑器中，插入一个新模块，并输入以下代码：

　　Sub LockPresentation()

　　Dim sPassword As String

　　sPassword = "yourpassword"

　　If Not ActivePresentation.SlideShowSettings.LockShow Then

　　ActivePresentation.SlideShowSettings.LockShow = msoTrue

　　ActivePresentation.SlideShowSettings.LockSlideShow = msoTrue

　　ActivePresentation.SlideShowSettings.LockNotes = msoTrue

　　ActivePresentation.SlideShowSettings.LockHandouts = msoTrue

　　ActivePresentation.SlideShowSettings.LockView = msoTrue

　　ActivePresentation.SlideShowSettings.LockWindow = msoTrue

　　ActivePresentation.SlideShowSettings.LockPointer = msoTrue

　　ActivePresentation.SlideShowSettings.LockSlideShow = msoTrue

　　ActivePresentation.SlideShowSettings.LockNotes = msoTrue

　　ActivePresentation.SlideShowSettings.LockHandouts = msoTrue

　　ActivePresentation.SlideShowSettings.LockView = msoTrue

　　ActivePresentation.SlideShowSettings.LockWindow = msoTrue

　　ActivePresentation.SlideShowSettings.LockPointer = msoTrue

　　ActivePresentation.SlideShowSettings.LockShow = msoTrue

　　MsgBox "Presentation is locked."

　　Else

　　MsgBox "Presentation is already locked."

　　End If

　　End Sub

　　将“yourpassword”替换为你设置的密码，然后运行宏即可。

　　4. 如何将PPT转换为PDF格式？

　　答：在PowerPoint中，打开PPT文件，点击“文件”菜单，选择“另存为”，在“另存为”对话框中，选择“PDF或XPS文档”格式，点击“创建PDF/XPS”即可。