Где я ошибаюсь в коде
Спасибо
PS
_ExcelFontSetProperties - не работает
Спасибо
PS
_ExcelFontSetProperties - не работает
Код:
#include <Array.au3>
#include <Excel.au3>
#include <MsgBoxConstants.au3>
Local $oAppl = _Excel_Open()
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_RangeWrite Example", "Error creating the Excel application object." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
Local $oWorkbook = _Excel_BookNew($oAppl)
If @error Then
MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_RangeWrite Example", "Error creating the new workbook." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
_Excel_Close($oAppl)
Exit
EndIf
_Excel_RangeWrite($oWorkbook, $oWorkbook.Activesheet, "Missing","A1")
$oWorkbook.Columns('A').NumberFormat = '20'
;~ $oWorkbook.Font.Size = 20
;~ $oWorkbook.Font.Size.Application.Selection.TypeText(15)
;~ $oWorkbook.Font.Name = "Arial"
Local $aArray1D[3] = ["AA", "BB", "CC"]
_Excel_RangeWrite($oWorkbook, $oWorkbook.Activesheet, $aArray1D, "A3")
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_RangeWrite Example 2", "Error writing to worksheet." & @CRLF & "@error = " & @error & ", @extended = " & @extended)