Функция _ExcelFontSetProperties

_ExcelFontSetProperties

Устанавливает формат начертания символов: "жирный", "курсив" или "подчеркнутый" для всех ячеек целевого диапазона.

#include <Excel.au3>
_ExcelFontSetProperties($oExcel, $sRangeOrRowStart [, $iColStart = 1 [, $iRowEnd = 1 [, $iColEnd = 1 [, $fBold = False [, $fItalic = False [, $fUnderline = False]]]]]])

Параметры

$oExcel	Ссылка на COM-объект "Excel.Application" полученная ранее вызванными _ExcelBookOpen(), _ExcelBookNew(), или _ExcelBookAttach() Внимание!!! Метод использует условные координаты диапазона - координаты верхней левой и нижней правой ячеек (формат ссылок R1C1) Следующие 4 параметра описывают координаты этих ячеек:
$sRangeOrRowStart	Номер строки верхней левой ячейки целевого диапазона
$iColStart	[необязательный]Номер столбца верхней левой ячейки целевого диапазона (по умолчанию=1)
$iRowEnd	[необязательный]Номер строки нижней правой ячейки целевого диапазона (по умолчанию=1)
$iColEnd	[необязательный]Номер столбца нижней правой ячейки целевого диапазона(по умолчанию=1)
$fBold	[необязательный] Флаг формата "Жирный": True="Жирный", False="Обычный"
$fItalic	[необязательный] Флаг формата "Курсив": True="Курсив", False="Обычный"
$fUnderline	[необязательный] Флаг формата "Подчеркнутый": True="Подчеркнутый", False="Обычный"

Возвращаемое значение

Успех:	Возвращает 1
Ошибка:	Возвращает 0, Устанавливает значение флага ошибки @error:
@error:	0 - Скрипт завершил работу без ошибок
	1 - Ошибка OLE/COM ($oExcel), возможно указанный объект не существует
	2 - Значение строки\столбца верхней левой ячейки целевого диапазона не является числом, или недопустимо
	3 - Значение строки\столбца нижней правой ячейки целевого диапазона не является числом, или недопустимо
@extended:	0 - Ошибка в значении строки
	1 - Ошибка в значении столбца

Примечания

Внимание!!! документы разных форматов MS Office имеют различные ограничения по количеству столбцов и строк:
*.xls (формат xlExcel8, стандартный для MS Office 2003,97,95) имеет ограничения в 255 столбцов 65 535 строк
*.xlsx,*.xlsb,*.xlsm (XML-форматы MS Office 2007-2010) имеют ограничения в 16 384 столбца и 1 048 576 строк

Пример

; **************************************
; Пример 1 - Редактирование формата начертания символов в ячейках целевого диапазона
; **************************************

#include <Excel.au3>

Local $oExcel = _ExcelBookNew() ;Создает новую рабочую книгу
Local $sRangeOrRowStart = 1, $iColStart = 1, $iRowEnd = 10, $iColEnd = 10
Local $fBold, $fItalic, $fUnderline, $i = 1

; Циклически заполняем диапазон ячеек случайными числами
For $i = 1 To 10
For $j = 1 To 10
_ExcelWriteCell($oExcel, Round(Random(1, 100), 0), $i, $j) ;Записывает в ячейку случайное целое число из диапазона от 1 до 100
Next
Next

MsgBox(4096, "_ExcelHorizontalAlignSet", "Обратите внимание на формат начертания символов, сейчас будут продемонстрированы все возможные комбинации" & @CRLF & "Нажмите ОК для продолжения...")

$i = 1
_ExcelFontSetProperties($oExcel, $sRangeOrRowStart, $iColStart, $iRowEnd, $iColEnd, False, False, False)
ToolTip("Демонстрируется комбинация № " & $i)
$i += 1
Sleep(1500); Пауза 1,5 сек.

_ExcelFontSetProperties($oExcel, $sRangeOrRowStart, $iColStart, $iRowEnd, $iColEnd, False, False, True)
ToolTip("Демонстрируется комбинация № " & $i)
$i += 1
Sleep(1500); Пауза 1,5 сек.

_ExcelFontSetProperties($oExcel, $sRangeOrRowStart, $iColStart, $iRowEnd, $iColEnd, False, True, True)
ToolTip("Демонстрируется комбинация № " & $i)
$i += 1
Sleep(1500); Пауза 1,5 сек.

_ExcelFontSetProperties($oExcel, $sRangeOrRowStart, $iColStart, $iRowEnd, $iColEnd, True, True, True)
ToolTip("Демонстрируется комбинация № " & $i)
$i += 1
Sleep(1500); Пауза 1,5 сек.

_ExcelFontSetProperties($oExcel, $sRangeOrRowStart, $iColStart, $iRowEnd, $iColEnd, True, False, False)
ToolTip("Демонстрируется комбинация № " & $i)
$i += 1
Sleep(1500); Пауза 1,5 сек.

_ExcelFontSetProperties($oExcel, $sRangeOrRowStart, $iColStart, $iRowEnd, $iColEnd, True, True, False)
ToolTip("Демонстрируется комбинация № " & $i)
$i += 1
Sleep(1500); Пауза 1,5 сек.

_ExcelFontSetProperties($oExcel, $sRangeOrRowStart, $iColStart, $iRowEnd, $iColEnd, False, True, False)
ToolTip("Демонстрируется комбинация № " & $i)
$i += 1
Sleep(1500); Пауза 1,5 сек.

_ExcelFontSetProperties($oExcel, $sRangeOrRowStart, $iColStart, $iRowEnd, $iColEnd, True, False, True)
ToolTip("Демонстрируется комбинация № " & $i)
$i += 1
Sleep(1500); Пауза 1,5 сек.

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