After yesterdays OneNote tool, I thought I’d do another while I think about it.
Another annoyance of OneNote is it’s lack of control over pasting information from the clipboard. I’ve raised a suggestion with MS to improve this; you can see my comment in the newsgroup.
To ease things a little if you need to copy and paste lots of stuff to OneNote, here is an AutoHotKey script to help. You need to assign this to a hot-key and have OneNote open in the background. Select something and press the hot-key and it will be pasted (using the current default paste option as this cannot be controlled) into the current note in OneNote.
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
|
; <A class="st_tag internal_tag" title="Posts tagged with AutoHotKey" href="http://it.knightnet.org.uk/tags/autohotkey" rel=tag>AutoHotKey</A> Script to copy pre-selected stuff from the currently active window
; to the currently open note in OneNote
;
; Usage: #include in your main <A class="st_tag internal_tag" title="Posts tagged with AutoHotKey" href="http://it.knightnet.org.uk/tags/autohotkey" rel=tag>AutoHotKey</A>.ahk assigned to a hot key
; Limitations:
; 1) OneNote must be open - maybe change this in the future so that content goes to a new unfiled note
; 2) Doesn't swap back to original application
;
; Author: Julian Knight, http://www.knightnet.org.uk/contact.htm
; Version: 2009-04-01 v1.0
; We need a partial title match but we will also reset to previous setting
oldTitleMatchMode := A_TitleMatchMode
SetTitleMatchMode, 2
; Settings
winTitlePart := " - Microsoft <A class="st_tag internal_tag" title="Posts tagged with Office" href="http://it.knightnet.org.uk/tags/office" rel=tag>Office</A> OneNote" ; Partial title of ON windows
; Copy currently selected stuff
SendPlay, ^c ; Use sendplay to avoid unexpected interactions with Win key
; If OneNote is not started, give up
IfWinExist, %winTitlePart%
{
; Save the currently active window title
WinGetTitle, actWin, A
; If OneNote is not active, activate it now
IfWinNotActive, %winTitlePart%
WinActivate, %winTitlePart%
; Check again, if ON active then paste else error
IfWinActive, %winTitlePart%
{
; Paste to ON & Add some blank lines
SendPlay, ^v`r ; Use sendplay to avoid unexpected interactions with Win key
; Switch window back to previously active
WinActivate, %actWin%
}
else
MsgBox, Could not activate OneNote window.
} else
MsgBox, Can't find ON [%winTitlePart%]
SetTitleMatchMode, %oldTitleMatchMode%
return
|