excel表格注释的位置和大小

你好！Excel表格中的注释的位置和大小经常会发生改变，而在注释的格式设置中选择自动调整大小和 大小和位置跟随表格 以后，只有注释的大小改变了，但是位置还是没有变化。能否像WPS一样加入一个重置所有注释的功能，让表格中所有已经离位的注释一键回到原本的位置？或者直接设置注释框默认的自动调整大小以及位置跟随表格？这样也能够解决由于注释跑的的特别远而导致的滚动条缩小的问题。Hi。根据您的描述，您是想有一个办法可以设置让表格中所有已经离位的注释回到原位，或者可以自定义注释框的大小及位置。如果我的理解正确的话，您可以使用VBA代码来完成这样的需求。1.同时按住ALT+F11键打开MicrosoftVisualBasicforApplications窗口2.点击插入>模块>然后粘贴下方代码在出现的窗口SubResetComments()'Update20141110DimpCommentAsCommentForEachpCommentInApplication.ActiveSheet.CommentspComment.Shape.Top=pComment.Parent.Top+5pComment.Shape.Left=pComment.Parent.Offset(0,1).Left+5NextEndSub3.然后按F5键运行这段代码，活动工作表中的所有注释位置都会立即重置，请看下方截图所示:
Hi。根据您的描述，您是想有一个办法可以设置让表格中所有已经离位的注释回到原位，或者可以自定义注释框的大小及位置。如果我的理解正确的话，您可以使用VBA代码来完成这样的需求。1.同时按住ALT+F11键打开MicrosoftVisualBasicforApplications窗口2.点击插入>模块>然后粘贴下方代码在出现的窗口SubResetComments()'Update20141110DimpCommentAsCommentForEachpCommentInApplication.ActiveSheet.CommentspComment.Shape.Top=pComment.Parent.Top+5pComment.Shape.Left=pComment.Parent.Offset(0,1).Left+5NextEndSub3.然后按F5键运行这段代码，活动工作表中的所有注释位置都会立即重置，请看下方截图所示:
非常感谢！亲测非常好用！