边框自动缩放至紧密贴合文本

您好，

         使用您编写得宏代码之后确实实现了这个功能，感谢分享，不过使用中发现一点小问题，如您能依据建议修改，将会进一步提升此动作。

问题如下：

          1、使用完此功能后有些卡顿，不知您能否帮忙优化；

          2、此功能使用后文本框大小无随文字多少变化，希望可以再0边距的基础上做到随文本内容缩放文本框大小，实现0边距以及文本框大小紧密贴合文本内容的目的。

                                                                                                                                                                                           一点小建议，感谢！

                                                                                                                                                                                                祝您生活愉快！