Put selected text from an email message into a text variable

Is there a way in Outlook VBA to assign a string variable to text that is selected in an email message?

In Word VBA I can do this:

Dim Body as String
Body = Selection

I tried adding a reference to the Microsoft Word Object Library in the Outlook VBA editor, but it did not work.

i got this all wrong

i finally found this is relatively simple, posted in your previous thread as it was better to use your basic code