Delphi и Excel – использование автозаполнения

В Delphi 10 / Seattle, с Excel 2013 … Я пытаюсь:

  • Добавьте столбец (столбец AJ) и установите его текст заголовка (работает код)
  • Задайте значение столбца, строки 2, как AutoSum (работает код)
  • Скопируйте вычисления из строки 2 во все остальные строки. (не работает)

Во время этапа «Копировать вычисление» я использую метод AutoFill. Я получаю сообщение об ошибке «Ошибка автозаполнения класса диапазона». но я не знаю, почему … (обратите внимание, что переменная aws глобально настроена на Active Worksheet.)

const TOTAL_TOUCHES = 'AJ'; ... var ColumnHeader : OleVariant; SecondRow : OleVariant; ColRange : OleVariant; myAddr, myAddr2 : String; LastCell : string; begin // This routine adds the header 'Total Touches' and then puts an AutoSum in that column for all rows // Set the header myAddr := TOTAL_TOUCHES + '1'; ColumnHeader := aws.Range[ myAddr, myAddr]; ColumnHeader.FormulaR1C1 := 'Total Touches'; // Put the first occurance of the Autosum in Row 2 myAddr := TOTAL_TOUCHES + '2'; SecondRow := aws.Range[ myAddr, myAddr]; SecondRow.FormulaR1C1 := '=SUM(RC[-6]:RC[-1])'; SecondRow.Autofill(aws.range['AJ3:AJ50', EmptyParam], xlFillCopy); 

Как только это будет работать, я поставлю это, чтобы скопировать ВСЕ столбцы в строке (в отличие от AJ3: AJ50, но это шаг ребенка …

Что я делаю не так?

В документации говорится, что аргумент назначения для AutoFill , который является первым аргументом, должен содержать исходный диапазон. В вашем случае исходный диапазон – AJ2, но AJ3: AJ50 не включает эту ячейку.

  • Delphi: почему const задает это странное значение, используя Excel OLE interop?
  • Поиск и замена OLE в документах Excel и PowerPoint
  • Ячейки, не названные в листах Excel, но все же данные из ячеек должны быть взяты
  • Delphi, экспорт HTML-таблицы в Excel
  • Экспорт в Excel с Delphi без превосходства
  • Получение координат объекта ExcelRange
  • Проблема с форматированием одной колонки Excel с автоматизацией OLE с использованием Delphi
  • ADO с файлами XLSX в Delphi XE
  • Чтение листа Excel с использованием ADO / ODBC в Delphi 7
  • Delphi Не удается установить ширину столбца или строку в Excel при использовании Арабского региона в Windows
  • delphi ole excel container, сохранить файл
  • Давайте будем гением компьютера.