如何：显示工作表注释

  • 项目

可以通过编程方式显示和隐藏 Microsoft Office Excel 工作表中的注释。

**适用于：**本主题中的信息适用于 Excel 2007 和 Excel 2010 的文档级项目和应用程序级项目。有关更多信息，请参见按 Office 应用程序和项目类型提供的功能。

在文档级自定义项中显示工作表中的所有注释

  • 如果希望显示注释，请将 Visible 属性设置为 true，否则设置为 false。 此代码必须放置在一个表类中，而不是放在 ThisWorkbook 类中。

    Private Sub ShowOrHideComments(ByVal show As Boolean)
    Dim i As Integer
    For i = 1 To Me.Comments.Count
        Me.Comments(i).Visible = show
    Next
End Sub

    private void ShowOrHideComments(bool show)
{
    for (int i = 1; i <= this.Comments.Count; i++)
    {
        this.Comments[i].Visible = show;
    }
}

在应用程序级外接程序中显示工作表中的所有注释

  • 如果希望显示注释，请将 Visible 属性设置为 true，否则设置为 false。

    Private Sub ShowOrHideComments(ByVal show As Boolean)
    Dim worksheet As Excel.Worksheet = CType(Application.ActiveSheet, Excel.Worksheet)
    Dim i As Integer
    For i = 1 To worksheet.Comments.Count
        worksheet.Comments(i).Visible = show
    Next
End Sub

    private void ShowOrHideComments(bool show)
{
    Excel.Worksheet worksheet = (Excel.Worksheet)Application.ActiveSheet;
    for (int i = 1; i <= worksheet.Comments.Count; i++)
    {
        worksheet.Comments[i].Visible = show;
    }
}

请参见

任务

如何：添加和删除工作表注释

概念

使用工作表

宿主项和宿主控件概述