OneNote.fromVBA.CloseOpenAndNavigatetoaNoteBook Dim oneNote As OneNote14.Application Set oneNote = New OneNote14.Application