删除活动工作表中的一行或多行.
#Include <Excel.au3>
_ExcelRowDelete($oExcel, $iRow [, $iNumRows = 1])
| $oExcel | 由前面调用 _ExcelBookOpen() 或者 _ExcelBookNew() 函数返回的 Excel 对象 |
| $iRow | 指定删除的行号 |
| $iNumRows | [可选参数] 删除的行数 |
| 成功: | 返回 1 |
| 失败: | 返回 0, 并设置 @error: |
| @error: | 0 - 无错误 |
| 1 - 指定的对象不存在 | |
| 2 - 指定的行号无效 |
; ***************************************************************
; 示例 1 - 打开一个工作簿并返回其对象标识符后, 在循环中写入内容到单元格. 删除一行, 然后保存并关闭文件.
; *****************************************************************
#include <Excel.au3>
Local $oExcel = _ExcelBookNew() ;创建新工作簿, 并使其可见
For $i = 1 To 5 ;循环
_ExcelWriteCell($oExcel, $i, $i, 1) ;把数值 1 到 5 垂直写入单元格
Next
ToolTip("Deleting Rows Soon...")
Sleep(3500)
_ExcelRowDelete($oExcel, 1, 1) ;删除第一行并且仅删除一行
MsgBox(4096, "Exiting", "Press OK to Save File and Exit")
_ExcelBookSaveAs($oExcel, @TempDir & "\Temp.xls", "xls", 0, 1) ; 现在我们把它保存到临时目录; 必要时覆盖文件
_ExcelBookClose($oExcel) ; 最后我们关闭并退出
; ***************************************************************
; 示例 2 - 打开一个工作簿并返回其对象标识符后, 在循环中写入内容到单元格. 删除一些行, 然后保存并关闭文件.
; *****************************************************************
#include <Excel.au3>
$oExcel = _ExcelBookNew() ; 打开新工作簿, 并使其可见
For $i = 1 To 5 ;循环
_ExcelWriteCell($oExcel, $i, $i, 1) ;把数值 1 到 5 垂直写入单元格
Next
ToolTip("Deleting Rows Soon...")
Sleep(3500)
_ExcelRowDelete($oExcel, 3, 2) ;从第三行开始删除, 并且删除两行
MsgBox(4096, "Exiting", "Press OK to Save File and Exit")
_ExcelBookSaveAs($oExcel, @TempDir & "\Temp.xls", "xls", 0, 1) ; 现在我们把它保存到临时目录; 必要时覆盖文件
_ExcelBookClose($oExcel) ; 最后我们关闭并退出