KB0179：PowerPoint 2013 和 2016 中 Notes Pane 的滚动问题

  1. Home
  2. 资源
  3. 知识库
  4. KB0179

问题

当 PowerPoint 文件以 Normal 视图显示时，可以通过点击 PowerPoint status bar 中的 Notes 按钮，在幻灯片下方的 Notes pane 中编辑演讲者备注。但是，在 PowerPoint 2013 或 2016 中尝试用鼠标滚轮滚动 Notes pane 时，它总会返回到文本光标所在的行。

此问题是由 PowerPoint 2013 和 2016 中的错误导致的。我们已向 Microsoft 提交案例。若贵公司有 Microsoft Office 支持合同，而且您希望联系 Microsoft 请求修复，可以参阅 Microsoft 案例编号 114072811653716。 无需 thinkcell 也可以重现此错误。 阅读更多

不使用 thinkcell 进行复现

请执行以下步骤：

  1. 使用新的空文件打开 PowerPoint 2013 或 2016。
  2. 在 PowerPoint 中，转到 Insert > thinkcell > Tools 工具菜单图标 > Deactivate thinkcell。
  3. 在幻灯片上放置一个 PowerPoint 形状：Home > Drawing > Oval。
  4. 在普通视图中点击 PowerPoint status bar 上的 Notes 按钮，以显示 Notes pane - 请参见 PowerPoint 幻灯片下方的“Click to add notes”。
  5. 在 Notes pane 中输入多行文本，直到出现垂直 scroll bar。
  6. 按 Alt + F11 打开 Microsoft Visual Basic for Applications。
  7. 将此代码添加为 Class Module，并命名为 cEventClass： 
    Public WithEvents PPTEvent As Application
Private Sub Class_Initialize()
  MsgBox "EventHandler is now active." & vbNewLine & _
    " - Click OK then click to place cursor at the end of the first line in the notes pane." & vbNewLine & _
    " - Scroll down in the notes pane with a mouse wheel until the line with the cursor is no longer visible." & vbNewLine & _
    " - Click on the PowerPoint Oval on the slide."
End Sub

Private Sub Class_Terminate()
  MsgBox "EventHandler is now inactive."
End Sub

Private Sub PPTEvent_WindowSelectionChange (ByVal Sel As Selection)
  ActivePresentation.CanCheckIn
End Sub
  8. 将此代码添加为 Module： 
    Dim cPPTObject As New cEventClass
Sub RunMe()
  Set cPPTObject.PPTEvent = Application
End Sub
  9. 在 PowerPoint 演示文稿窗口中，按 Alt + F8 打开 Macro 窗口
  10. Run RunMe 宏。
  11. 将出现一个消息框。请按照其中的说明操作。

解决方案

在 Microsoft 修复此错误之前，可使用以下解决方法：

  • 增大 Notes pane 的垂直尺寸，使滚动条消失。
  • 使用键盘方向键滚动，而不是鼠标滚轮。
  • 改用 PowerPoint 的 Notes Page 视图：View > Presentation Views > Notes Page。