Проблемы с прокруткой в области заметок PowerPoint 2013 и 2016
Проблема
Когда файл PowerPoint отображается в Обычном режиме, пользователь может редактировать заметки докладчика в Области заметок под слайдом, нажав кнопку Заметки в строке состояния PowerPoint. Однако при попытке прокрутить Область заметок с помощью колесика мыши в PowerPoint 2013 или 2016, всегда происходит возврат к строке, на которой находится текстовый курсор.
Проблема обусловлена программной ошибкой в PowerPoint 2013 и 2016. Мы отправили отчет о данной ошибке компании Microsoft. Если у вашей компании есть контракт на поддержку Microsoft Office и вы хотите обратиться в Microsoft за исправлением, вы можете указать номер обращения Microsoft 114072811653716. Ошибку можно воспроизвести и без надстройки think-cell.
Воспроизведение ошибки без think-cell
Выполните следующие действия.
- Откройте в PowerPoint 2013 или 2016 новый пустой файл.
- В PowerPoint перейдите Insert > think-cell > Tools > Deactivate think-cell.
- Разместите фигуру PowerPoint на слайде: Домашняя страница → Рисунок → Овал.
- Нажмите кнопку Заметки в строке состояния PowerPoint в обычном режиме для отображения Области заметок — найдите надпись «Нажмите, чтобы добавить заметки» под слайдом PowerPoint.
- Введите несколько строк текста в Области заметок, пока не появится вертикальная полоса прокрутки.
- Нажмите сочетание клавиш Alt + F11, чтобы открыть Microsoft Visual Basic для приложений.
- Добавьте следующий код как Модуль класса и дайте ему имя 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
- Добавьте следующий код в качестве Модуля:
Dim cPPTObject As New cEventClass Sub RunMe() Set cPPTObject.PPTEvent = Application End Sub
- В окне презентации PowerPoint нажмите Alt + F8, чтобы открыть окно Макрос
- Запустите макрос RunMe.
- Появится окно сообщения. Следуйте приведенным инструкциям.
Решение
До тех пор пока Microsoft не исправит эту программную ошибку, применяются следующие обходные решения:
- Увеличьте вертикальный размер Области заметок, чтобы полоса прокрутки исчезла.
- Выполняйте прокрутку клавишами со стрелками вместо колесика мыши.
- Используйте представление PowerPoint Страница заметок вместо: Вид → Представления презентации → Страница заметок.