Knowledge base KB0179

Faire défiler les problèmes dans le volet Notes de PowerPoint 2013 et 2016

Problème

Lorsqu'un fichier PowerPoint apparaît dans l'affichage Normal, il est possible de modifier les notes de l'intervenant dans le volet Notes situé en dessous de la diapositive en cliquant sur le bouton Notes dans la barre d'état de PowerPoint. Cependant, lorsque vous essayez de faire défiler le volet Notes à l'aide de la molette de la souris dans PowerPoint 2013 ou 2016, il retourne toujours à la ligne sur laquelle le curseur de texte a été placé.

Ce problème est provoqué par un bogue dans PowerPoint 2013 et 2016. Nous avons déposé une requête auprès de Microsoft. Si votre société possède un contrat auprès de l'Assistance Microsoft Office, vous pouvez contacter Microsoft pour demander un correctif en leur mentionnant le numéro de dossier 114072811653716. L'erreur est reproductible sans think-cell.

Reproduction de l'erreur sans think-cell

Procédez comme suit :

  1. Ouvrez PowerPoint 2013 ou 2016 avec un nouveau fichier vide.
  2. Dans PowerPoint, rendez-vous sur Insertionthink-cellPlusDésactiver think-cell.
  3. Placez une forme PowerPoint sur la diapositive : AccueilDessinEllipse.
  4. Dans l'affichage Normal, cliquez sur le bouton Notes dans la barre d'état de PowerPoint pour afficher le volet Notes (voir "Cliquer pour ajouter des notes" sous la diapositive PowerPoint).
  5. Saisissez plusieurs lignes de texte dans le volet Notes afin de faire apparaître la barre de défilement verticale.
  6. Appuyez sur Alt+F11 pour ouvrir la fenêtre Microsoft Visual Basic for Applications.
  7. Ajoutez ce code en tant que Module de classe et nommez-le 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. Ajoutez ce code en tant que Module :
    
    Dim cPPTObject As New cEventClass
    Sub RunMe()
     Set cPPTObject.PPTEvent = Application
    End Sub
    			
  9. Dans la fenêtre de présentation de PowerPoint, appuyez sur Alt+F8 pour ouvrir la fenêtre Macro.
  10. Exécutez la macro RunMe.
  11. Un message apparaît. Suivez ses instructions.

Solution

En attendant que Microsoft corrige ce bogue, vous disposez des solutions provisoires suivantes :

  • Augmentez la taille verticale du volet Notes pour faire apparaître la barre de défilement.
  • Faites défiler à l'aide des touches fléchées du clavier au lieu de la molette de la souris.
  • Utilisez l'affichage Page de notes dans PowerPoint : AffichageAffichages des présentationsPage de commentaires.