如何快速批量恢复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