If you want to avoid the select in between slides problem

Check that slide selection count for zero and if it is switch to notes page and immediately back to normal.

This should select the correct slide

ActiveWindow.ViewType = ppViewNotesPage

ActiveWindow.ViewType = ppViewNormal