如何迅速大局部恢復Excel批注框到默認位置

在Excel中插入批注時，默認批注會顯示在單元格的右上方。有時由于某種原因，批注框的位置會發生改變，當工作表中的批注較多，且在“顯示所有批注”的情況下，會顯得有些雜亂，如下圖。

?????

??? 要恢復批注的默認位置，逐一拖動批注框會十分繁瑣。這時可用下面的方法來快速實現。

??? 方法一：用選擇性粘貼

??? 1.復制包含批注的區域，如本例中的A2:D17區域，將其粘貼到一個空白位置或新工作表中。

??? 2.復制粘貼后的區域。

??? 3.再次選擇原區域，如本例為A2:D17區域（或選擇A2單元格），鼠標右擊，選擇“選擇性粘貼”，在彈出的對話框中選擇“批注”后確定，即可一次將全部批注恢復到默認位置。

???

??? 其原理是Excel在復制粘貼批注時會自動恢復其默認位置。

???

??? 方法二：用VBA

??? 按Alt+F11，打開VBA編輯器，在代碼窗口中粘貼下面的代碼后運行即可。

??? Sub 恢復批注到默認位置()
??? Dim Cmt As Comment
??? For Each Cmt In ActiveSheet.Comments
??????? With Cmt
???????????.Shape.Top = .Parent.Top - 7.5
????????? ?.Shape.Left = .Parent.Left + .Parent.Width + 11.25
?????? ?End With
??? Next
??? End Sub