_ExcelSheetActivate
Устанавливает целевой лист активным листом открытой рабочей книги Excel.
#include <Excel.au3>
_ExcelSheetActivate($oExcel, $vSheet)
Параметры
$oExcel | Ссылка на COM-объект "Excel.Application" полученная ранее вызванными _ExcelBookOpen(), _ExcelBookNew(), или _ExcelBookAttach() |
$vSheet |
Имя целевого листа или его порядковый номер в коллекции листов данной рабочей книги. |
Возвращаемое значение
Успех: | Возвращает 1 |
Ошибка: | Возвращает 0, Устанавливает значение флага ошибки @error: |
@error: | 0 - Скрипт завершил работу без ошибок |
1 - Ошибка OLE/COM ($oExcel), возможно указанный объект не существует | |
2 - Указанный порядковый номер не найден в коллекции листов целевой рабочей книги | |
3 - Указанное имя листа не найдено в коллекции листов целевой рабочей книги |
Примечания
Внимание!!! В MS Ofiice Excel целые положительные числа могут быть именем листа (н\п "1").Пример
; ********************************************************************
; Пример 1 - Активация листа с именем "Sheet2" в целевой рабочей книге
; ********************************************************************
#include <Excel.au3>
Local $oExcel = _ExcelBookNew() ; Создаем новую рабочую книгу
ToolTip('Обратите внимание на индикатор активного листа' & @CRLF & 'Сейчас будет активирован лист с именем: "Лист2"...')
Sleep(3500) ; Пауза 3,5 сек.
_ExcelSheetActivate($oExcel, "Лист2"); Активируем лист с именем: "Лист2"
MsgBox(4096, "_ExcelSheetActivate | Пример 1", "Демонстрация завершена, нажмите ОК")
_ExcelBookSaveAs($oExcel, @TempDir & "\Temp.xls", "xls", 0, 1) ; Сохраняем файл в директории временных файлов, перезаписывая если необходимо.
_ExcelBookClose($oExcel) ; Закрываем рабочую книгу
; *************************************************************************
; Пример 2 - Активация листа с порядковым номером 2 в целевой рабочей книге
; *************************************************************************
#include <Excel.au3>
Local $oExcel = _ExcelBookNew() ; Создает новую рабочую книгу
ToolTip('Обратите внимание на индикатор активного листа' & @CRLF & 'Сейчас будет активирован лист с порядковым номером: 3')
Sleep(3500) ; Пауза 3,5 сек.
_ExcelSheetActivate($oExcel, 3) ; Активирует лист с порядковым номером 3
MsgBox(4096, "_ExcelSheetActivate | Пример 2", "Демонстрация завершена, нажмите ОК")
_ExcelBookSaveAs($oExcel, @TempDir & "\Temp.xls", "xls", 0, 1) ; Сохраняем файл в директории временных файлов, перезаписывая если необходимо.
_ExcelBookClose($oExcel) ; Закрываем рабочую книгу