VBA code to Find/Replace Macro for Outlook 2019

Question

I need VBA code for OUTLOOK 2019 to do the following:

1. Start at beginning of document/email (Ctrl Home)
2. Find text (Ctrl F)
3. Find What: \'XX\' (M