The correct syntax for that line would be
Set olEmail = ActiveInspector.CurrentItem
(See Skatonni's code)
but as you are creating the message anyway why not simply use the macro to create the message?
Incidentally, if you define the Word elements as Objects, you don't need to add the reference to Word. You will see that my macro uses this (late binding) approach.