Powerpoint VBA code for moving to next/previous slide from WITHIN the notes window

Hi,

When editing the notes of my slides, I want to use a keyboard shortcut to easily move to the next or previous slide. There is no default shortcut key to do that, as far as I can find.

Right now I press F6, Down, Shift+F6. That is way to tedious for me :)

So I tried to create a macro to do this. That way, I can assign a shortcut key to that macro (like Alt+1).
Unfortunately, I cannot get this macro to work.

The easiest solution would be SendKeys "{F6}{PGDN}+{F6}". However, when I execute that macro, I end up in the notes pane of the slide that I was working on, not the next slide.

The same happens with this more elaborate macro:

With ActiveWindow
     If .ViewType = ppViewNormal And _
             .ActivePane.ViewType = ppViewNotesPage Then
         .Panes(2).Activate
     End If
 End With

 ActivePresentation.Slides(ActiveWindow.Selection.SlideRange(1).SlideIndex + 1).Select

 DoEvents

 With ActiveWindow
     If .ViewType = ppViewNormal Then
         .Panes(ppViewNotesPage).Activate
     End If
 End With


Any ideas on how to get this working would be really, really appreciated. At least by me :)

Thanks!
TJ