; ***************************************************************************
; Пример 1 - Добавление 1 строки в активный лист открытой рабочей книги Excel
; ***************************************************************************
#include <Excel.au3>

Local $oExcel = _ExcelBookNew() ; Создаем новую рабочую книгу

For $i = 1 To 5 
	_ExcelWriteCell($oExcel, $i, $i, 1) ; Записываем в ячейки, с вертикальным смещением равным нарастанию счетчика, числа от 1 до 5
Next

ToolTip("Обратите внимание на первую строку...")
Sleep(2000) ; Пауза 2 сек.

_ExcelRowInsert($oExcel, 1, 1) ; Вставляем 1 строку над первой строкой

MsgBox(4096, "_ExcelRowInsert | Пример 1", "Демонстрация завершена, нажмите ОК")
_ExcelBookSaveAs($oExcel, @TempDir & "\Temp.xls", "xls", 0, 1) ; Сохраняем файл в директории временных файлов, перезаписывая если необходимо.
_ExcelBookClose($oExcel) ; Закрываем рабочую книгу

; ***********************************************************************************
; Пример 2 - Добавление нескольких строк в активный лист открытой рабочей книги Excel
; ***********************************************************************************
#include <Excel.au3>

Local $oExcel = _ExcelBookNew() ; Создаем новую рабочую книгу

For $i = 1 To 5 
	_ExcelWriteCell($oExcel, $i, $i, 1) ; Записываем данные в ячейки с вертикальным смещением равным нарастанию счетчика - числа от 1 до 5
Next

ToolTip("Обратите внимание на вторую строку...")
Sleep(2000) ; Пауза 2 сек.

_ExcelRowInsert($oExcel, 2, 3) ; Вставляем 3 строки над второй строкой

MsgBox(4096, "_ExcelRowInsert | Пример 2", "Демонстрация завершена, нажмите ОК")
_ExcelBookSaveAs($oExcel, @TempDir & "\Temp.xls", "xls", 0, 1) ; Сохраняем файл в директории временных файлов, перезаписывая если необходимо.
_ExcelBookClose($oExcel) ; Закрываем рабочую книгу