Hide dimension line and extension line

[Rojnin]

Hello, I am trying to create a macro to hide the dimension line and the extension line on a selected dimension, on one side only. It's just an equivalent of the right click "Hide dimension line " and "Hide extension line". However, I can't do it. In view of your macros this should not be complicated for you. Thank you in advance for your help.

Before:

After: