名前文字列または番号によって指定したシートをアクティブ化します。
#Include <Excel.au3>
_ExcelSheetActivate($oExcel, $vSheet)
パラメータ
$oExcel | _ExcelBookOpen()か_ExcelBookNew()の呼び出しで開かれているExcelオブジェクト |
$vSheet | アクティブ化するシート。名前文字列または番号 |
返し値
成功: | 1 |
失敗: | 0を返し@errorに値を設定します |
@error: | 0 - 正常終了 |
1 - 指定されたオブジェクトが存在しません | |
2 - 指定されたシート番号は存在しません | |
3 - 指定されたシート名は存在しません |
注意
なし。
関連
例
; ***************************************************************
; 例 1 - ワークブックを開きオブジェクト識別子取得後、シート名の文字列を使用してシートをアクティブ化
; *****************************************************************
#include <Excel.au3>
Local $oExcel = _ExcelBookNew() ;新しいブックを作成して表示
_ExcelSheetActivate($oExcel, "Sheet2")
MsgBox(0, "Exiting", "Notice How Sheet2 is Active and not Sheet1" & @CRLF & @CRLF & "Now 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() ;新しいブックを作成して表示
_ExcelSheetActivate($oExcel, 2)
MsgBox(0, "Exiting", "Notice How Sheet2 is Active and not Sheet1" & @CRLF & @CRLF & "Now 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() ;新しいブックを作成して表示
$iNumberOfWorksheets = $oExcel.Worksheets.Count
MsgBox(0, "", $oExcel.Worksheets.Count)
_ExcelSheetActivate($oExcel, 2)
MsgBox(0, "Exiting", "Notice How Sheet2 is Active and not Sheet1" & @CRLF & @CRLF & "Now Press OK to Save File and Exit")
_ExcelBookSaveAs($oExcel, @TempDir & "\Temp.xls", "xls", 0, 1) ; 上書き設定でtempディレクトリに保存
_ExcelBookClose($oExcel) ; 閉じて終わり