VBA to open the recent outlook mail conversation of a specific ID in subject line

Question

Below is a working code which opens the mail item based upon the subject line which has a specific ID number from a excel cell

It work fine but after running the code it