VBA实现鼠标拖动画矩形

各位大神HELP！
因为工作中需要把各种画面截图贴在Excel中，然后在图片中指定的内容上画矩形，比较容易确认。
因工作量繁重，想做一个专门画四方框的工具，内容如下：
①按下快捷键(功能等同于点击了插入图形里的矩形，进入画图状态，但不把图画出来) →
②鼠标按下并拖动，开始在鼠标处画出图形 →
③松开鼠标，画图结束
矩形格式什么的不用管，小弟自己可以做，但上面描述这个功能还劳烦各位大神费神，小弟感激不尽！