Add Comments in Excel

20 Sep 20224 minutes to read

You can add comments in Excel to give feedback about the content of a cell. A red triangle in the upper-right corner of a cell indicates comment. By default, a comment can be seen only when you hover over the cell that contains the comment.

The following code shows how to add a comment with text to a cell using Interop and XlsIO for .NET.


private void AddComment()
    //Instantiate the application object
    var excelApp = new Microsoft.Office.Interop.Excel.Application();

    //Add a workbook
    Workbook workbook = excelApp.Workbooks.Add(System.Reflection.Missing.Value);

    //Get the A1 cell
    Range rng1 = excelApp.get_Range("A1", Missing.Value);

    //Add the comment with text
    rng1.AddComment("This is my comment");

    //Save the file

    //Quit the application
Private Sub AddComment()
    'Instantiate the application object
    Dim excelApp = New Microsoft.Office.Interop.Excel.Application()

    'Add a workbook
    Dim workbook As Workbook = excelApp.Workbooks.Add(System.Reflection.Missing.Value)

    'Get the A1 cell
    Dim rng1 As Range = excelApp.Range("A1")

    'Add the comment with text
    rng1.AddComment("This is my comment")

    'Save the file

    'Quit the application
End Sub


private void AddComment()
    using (ExcelEngine excelEngine = new ExcelEngine())
        //Instantiate the application object
        IApplication application = excelEngine.Excel;

        //Create a workbook
        IWorkbook workbook = application.Workbooks.Create(1);
        IWorksheet worksheet = workbook.Worksheets[0];

        //Add comments to a cell
        IComment comment = worksheet.Range["A1"].AddComment();
        comment.Text = "This is my comment";

        //Save the workbook
Private Sub AddComment()
    Using excelEngine As ExcelEngine = New ExcelEngine()
        'Instantiate the application object
        Dim application As IApplication = excelEngine.Excel

        'Create a workbook
        Dim workbook As IWorkbook = application.Workbooks.Create(1)
        Dim worksheet As IWorksheet = workbook.Worksheets(0)

        'Add comments to a cell
        Dim comment As IComment = worksheet.Range("A1").AddComment()
        comment.Text = "This is my comment"

        'Save as Excel file
    End Using
End Sub