; ***************************************************************
; Пример 1 - Изменение формата данных в целевом диапазоне ячеек MS Office 2007-2010
; ***************************************************************
#include <Excel.au3>

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

; Циклически заполняем диапазон ячеек случайными числами
For $y = 1 To 10
	For $x = 1 To 10
		_ExcelWriteCell($oExcel, Random(1000, 10000), $x, $y) ;Записываем в ячейку случайное целое число из диапазона от 1000 до 100000
	Next
Next

$sFormat = "[$-F800]dddd, mmmm dd, yyyy" ; "[$-F800]dddd, mmmm dd, yyyy" - условное строковое обозначение формата "long date" (длинная дата)
_ExcelNumberFormat($oExcel, $sFormat, 1, 1, 5, 5) ; диапазон форматирования определен верхней-левой ячейкой(строка=1,столбец=1) и нижней-левой ячейкой(строка=5,столбец=5)

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


; ***************************************************************
; Пример 2 - Изменение формата данных в целевом диапазоне ячеек MS Office 2003
; ***************************************************************
#include <Excel.au3>

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

; Циклически заполняем диапазон ячеек случайными числами
For $y = 1 To 10
	For $x = 1 To 10
		_ExcelWriteCell($oExcel, Random(1000, 10000), $x, $y) ;Записываем в ячейку случайное целое число из диапазона от 1000 до 100000
	Next
Next

$sFormat = "$# ##0.00$" ; "$# ##0.00$" - условное строковое обозначение формата "currency" (Валюта)
_ExcelNumberFormat($oExcel, $sFormat, 1, 1, 5, 5) ; диапазон форматирования определен верхней-левой ячейкой(строка=1,столбец=1) и нижней-левой ячейкой(строка=5,столбец=5)

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