1OnError((exception, mode) => (FileAppend(exception.Message, "**"), ExitApp(1)))
2DetectHiddenWindows false
3app := ComObject("OneNote.Application")
4app.NavigateTo("{9193CD4B-2F8C-055F-3BDB-4EFF291B5152}{1}{B0}", "", false)
5hwnd := WinWait("ahk_class Framework::CFrame ahk_exe ONENOTE.EXE",, 10)
6if !hwnd
7 throw Error("OneNote window did not appear")
8WinMaximize(hwnd)
9WinActivate(hwnd)
10if !WinWaitActive(hwnd,, 10)
11 throw Error("OneNote window did not become active")
12app.NavigateTo("{9193CD4B-2F8C-055F-3BDB-4EFF291B5152}{1}{B0}", "", false)
13Sleep 300
14Sleep(2000)