[VBScript] GetObject関数

>Blog Top Page >[VBScript] Top Page >[VBScript] 関数 一覧

■構文
GetObject([pathname] [, class])

■説明
ファイルから取得した ActiveX オブジェクトへの参照を返します。
第一引数：(省略可能)取得するオブジェクトが含まれているファイルの絶対パスとファイル名を指定します。
第二引数：(省略可能)オブジェクトのクラスを表す文字列を指定します。
注：
第一引数を省略する場合、第二引数を必ず必要とします。
第二引数を省略する場合、第一引数を必ず必要とします。

■サンプルコード

view plainprint?

1. Option Explicit  
2.   
3. '起動済みのExcelアプリのオブジェクトを取得して  
4. '現在の時間をA1セル書き込む場合  
5.       
6. Dim objExcel  
7. Set objExcel = GetObject(, "Excel.Application")  
8. objExcel.Range("A1") = Time  
9. Set objExcel = Nothing  

Option Explicit

'起動済みのExcelアプリのオブジェクトを取得して
'現在の時間をA1セル書き込む場合
    
Dim objExcel
Set objExcel = GetObject(, "Excel.Application")
objExcel.Range("A1") = Time
Set objExcel = Nothing

>Blog Top Page >[VBScript] Top Page >[VBScript] 関数 一覧