Keith指出,向单元格添加评论很容易。他想知道是否有一种方法可以将同一条评论同时插入多个单元格中。

简短的答案是无法同时插入多个注释。但是,您可以将评论复制到多个单元格。

请按照下列步骤操作:

。像往常一样,在第一个单元格中插入您的评论。

。选择注释的单元格,然后按Ctrl + C。这会将单元格复制到剪贴板。

。选择要具有相同注释的单元格范围。

。从编辑菜单中选择选择性粘贴。 Excel将显示“选择性粘贴”对话框。 (请参见图1。)

。单击评论单选按钮。

。单击确定。

结果是仅将来自第2步中的单元格的注释粘贴到您在第3步中选择的单元格。如果这些单元格中已有任何注释,则这些注释将替换为您要粘贴的注释。

如果您真的想同时向所有单元格添加注释,那么唯一的方法就是通过宏。以下示例将提示您输入评论,然后将评论添加到您选择的所有单元格中。

Sub InsertCommentsSelection()

Dim sCmt As String     Dim rCell As Range

sCmt = InputBox( _       Prompt:="Enter Comment to Add" & vbCrLf & _       "Comment will be added to all cells in Selection", _       Title:="Comment to Add")

If sCmt = "" Then         MsgBox "No comment added"

Else         For Each rCell In Selection             With rCell                 .ClearComments                 .AddComment                 .Comment.Text Text:=sCmt             End With         Next     End If     Set rCell = Nothing End Sub

注意:

如果您想知道如何使用此页面(或_ExcelTips_网站上的任何其他页面)中描述的宏,我准备了一个特殊页面,其中包含有用的信息。

_ExcelTips_是您进行经济高效的Microsoft Excel培训的来源。

本技巧(3521)适用于Microsoft Excel 97、2000、2002和2003。可以在以下功能区中为Excel的功能区界面(Excel 2007及更高版本)找到本技巧的版本: