Function Reference

_ExcelRowInsert

アクティブなワークシートに行を挿入します。

#Include <Excel.au3>
_ExcelRowInsert($oExcel, $iRow [, $iNumRows = 1])

 

パラメータ

$oExcel _ExcelBookOpen()か_ExcelBookNew()の呼び出しで開かれているExcelオブジェクト
$iRow 挿入する行位置
$iNumRows [オプション]挿入する行数

 

返し値

@error: 0 - 正常終了
1 - 指定されたオブジェクトが存在しません
2 - 指定された行位置が無効です

 

注意

この関数は行挿入位置以降の全ての行を下側にシフトさせます。

 

関連

 


; ***************************************************************
; 例 1 - ワークブックを開きオブジェクト識別子取得後、ループを使ってセルに書き込む。 1行挿入して保存して閉じる。
; *****************************************************************
#include <Excel.au3>

Local $oExcel = _ExcelBookNew() ;新しいブックを作成して表示

For $i = 1 To 5 ;ループ
    _ExcelWriteCell($oExcel, $i, $i, 1) ;1から5の値を使って垂直方向にセルに書き込む
Next

ToolTip("Inserting Row(s) Soon...")
Sleep(3500) ;ユーザー確認のために一時停止

_ExcelRowInsert($oExcel, 1, 1) ;1行目に1行挿入

MsgBox(0, "Exiting", "Press OK to Save File and Exit")
_ExcelBookSaveAs($oExcel, @TempDir & "\Temp.xls", "xls", 0, 1) ; 上書き設定でtempディレクトリに保存
_ExcelBookClose($oExcel) ; 閉じて終わり

; ***************************************************************
; 例 2 - ワークブックを開きオブジェクト識別子取得後、ループを使ってセルに書き込む。 行を挿入して保存して閉じる。
; *****************************************************************
#include <Excel.au3>

Local $oExcel = _ExcelBookNew() ;新しいブックを作成して表示

For $i = 1 To 5 ;ループ
    _ExcelWriteCell($oExcel, $i, $i, 1) ;1から5の値を使って垂直方向にセルに書き込む
Next

ToolTip("Inserting Row(s) Soon...")
Sleep(3500)

_ExcelRowInsert($oExcel, 2, 3) ;2行目に3行挿入

MsgBox(0, "Exiting", "Press OK to Save File and Exit")
_ExcelBookSaveAs($oExcel, @TempDir & "\Temp.xls", "xls", 0, 1) ; 上書き設定でtempディレクトリに保存
_ExcelBookClose($oExcel) ; 閉じて終わり