I was trying this on my Word 2013 but it gives me a syntax error because my office runs in 64bits. The error is "The code in this project must be updated for use on 64-bit systems. Please review and update Declare statements and then mark them with the PtrSafe attribute."
I tried to declare the functions with PtrSafe but that's not enough. Some types also need to be changed. I tried to mess around with it a bit but just managed to either crash Word or have no action at all.
Have you checked this on a 64bit system?