Экспорт комментариев из Excel

Есть ли способ экспортировать комментарии с листа excel вместе со значением ячейки.?

Ниже приведен пример функции, которая возвращает все комментарии в листе:

Sub CreateCommentsSummary() Dim rgComments As Range, rgCell As Range, rgOutput As Range ' get all cells with comment Set rgComments = ActiveSheet.Cells.SpecialCells(xlCellTypeComments) ' get cell reference where user want to place the summary Set rgOutput = _ Application.InputBox(Prompt:="Select cell where you want to put the comments summary", _ Title:="Comments Summary", Type:=8) ' read each cell with comment and build the summary For Each rgCell In rgComments rgOutput.Range("A1") = rgCell.Address ' print cell address rgOutput.Offset(0, 1).Range("A1") = rgCell.Value ' print cell value rgOutput.Offset(0, 2).Range("A1") = rgCell.comment.Text 'print cell comment text Set rgOutput = rgOutput.Offset(1, 0) Next rgCell End Sub 
  • экспортировать данные из активного wooksheet
  • Есть ли ограничение строки для excel с использованием BIFF?
  • JExcelApi: несколько форматов в одной ячейке?
  • C # Добавление значения из приложения Windows Form в документ Excel
  • Доступ к Excel через VBA на конкретный лист при перезаписи списка переменных записей
  • Шаблон Excel по умолчанию не выбран при экспорте в Excel из другого приложения
  • Grails: Как создать список MS Excel?
  • Экспорт изображений Excel VBA
  • Экспортированный файл Excel всегда доступен только для чтения
  • Экспорт инструкции SELECT в Excel в запросе
  • Экспорт в Excel от SSRS 2005 закручивает уровни детализации
  • Interesting Posts

    ] Ошибка: произошла ошибка при настройке привязки для столбца. Статус привязки был «DT_NTEXT»

    Ошибка в Экспорт данных из базы данных excel в sql

    Только для 2016 продуктов для офисных плагинов 365

    Вытягивание даты и времени из Excel в Pandas и объединение его в метку времени

    SentOnBehalfOf не работает в Excel 2010 VBA Code

    Получить столбец, найдя значение в строке

    Совместное использование настраиваемых макросов и пользовательской ленты Excel с другими пользователями через Sharepoint

    Перенести столбец excel, в зависимости от значения других столбцов

    INDEX MATCH – Список с формулой excel, основанный на нескольких критериях

    Excel VBA – помощь при сравнении диапазонов и массивов

    Вариант VBA Array – SubScript вне диапазона

    VBA Regex: совпадение, не показывающее значения

    Прерывание макроса для обработки нажатий клавиш для плавного пользовательского интерфейса

    Автоматизация слияния электронной почты в Excel VBA – Не отправлять несколько писем

    Как назначить значение по умолчанию для всех ячеек под определенным столбцом?

    Давайте будем гением компьютера.