设置单元格水平对齐方式.
#Include <Excel.au3>
_ExcelHorizontalAlignSet($oExcel, $sRangeOrRowStart [, $iColStart = 1 [, $iRowEnd = 1 [, $iColEnd = 1 [, $sHorizAlign = "left"]]]])
| $oExcel | 由预先调用_ExcelBookOpen()或_ExcelBookNew()打开的Excel对象 |
| $sRangeOrRowStart | A1范围, 或者在使用R1C1格式时的整数行数 |
| $iColStart | [可选参数] 数字格式开始列(左) (默认为1) |
| $iRowEnd | [可选参数] 数字格式结束行(底) (默认为1) |
| $iColEnd | [可选参数] 数字格式结束列(右) (默认为1) |
| $sHorizAlign | [可选参数] 水平对齐("left"|"center"|"right") (默认为"left") |
| 成功: | 返回 1 |
| 失败: | 返回 0, 并设置 @error: |
| @error: | 1 - 指定的对象不存在 |
| 2 - 起始行或列无效 | |
| 3 - 结束行或列无效 | |
| @extended: | 0 - 行无效 |
| 1 - 列无效 |
; *****************************************************************
; 示例 1 打开一个新的工作表并返回其对象标识符, 然后设置一个范围内每个单元格的水平对齐方式
; *****************************************************************
#include <Excel.au3>
Local $oExcel = _ExcelBookNew() ;创建一个新的工作表并打开
Local $sRangeOrRowStart = 1, $iColStart = 1, $iRowEnd = 10, $iColEnd = 10, $sHorizAlign = "left"
;使用一个简单的循环和随机数字填充单元格
For $i = 1 To 10
For $j = 1 To 10
_ExcelWriteCell($oExcel, Round(Random(1, 100), 0), $i, $j) ;向文件写入随机数字信息
Next
Next
MsgBox(4096, "提示", "在一个范围内设置每个单元格的水平对齐方式" & @CRLF & "按[确定]开始")
_ExcelHorizontalAlignSet($oExcel, $sRangeOrRowStart, $iColStart, $iRowEnd, $iColEnd, $sHorizAlign)
MsgBox(4096, "提示", "水平对齐方式 '左对齐'")
$sHorizAlign = "center"
_ExcelHorizontalAlignSet($oExcel, $sRangeOrRowStart, $iColStart, $iRowEnd, $iColEnd, $sHorizAlign)
MsgBox(4096, "提示", "水平对齐方式 '居中'")
$sHorizAlign = "right"
_ExcelHorizontalAlignSet($oExcel, $sRangeOrRowStart, $iColStart, $iRowEnd, $iColEnd, $sHorizAlign)
MsgBox(4096, "提示", "水平对齐方式 '右对齐'")
MsgBox(4096, "退出", "按[确定]保存文件并退出")
_ExcelBookSaveAs($oExcel, @TempDir & "\Temp.xls", "xls", 0, 1) ;保存至临时目录中,如果文件已存在将覆盖原文件
_ExcelBookClose($oExcel) ;关闭工作表.