ActiveXオブジェクトへの参照を作成して返す - CreateObject関数 [ExcelのVBA]
CreateObject関数
CreateObject関数はActiveXオブジェクトへの参照を作成して返します。
分類 | その他 |
---|
書式
CreateObject(class,[servername])
class | (必須)作成するアプリケーション名とクラス名を指定する |
servername | (省略可能)オブジェクトが作成されるネットワークサーバーの名前を指定する。省略した場合はローカルコンピューターが使用される |
使用例
次のコードはCreateObject関数でエクセルオブジェクトを作成してエクセルのシートに文字列を設定する例です。
Private Sub CommandButton1_Click() On Error GoTo ERROR_HANDER Dim xlApp As Object ' Excel.Application Dim xlBook As Object ' Excel.Workbook Dim xlSheet As Object ' Excel.Worksheet ' エクセルオブジェクトの作成 Set xlApp = CreateObject("Excel.Application") Set xlBook = xlApp.Workbooks.Add ' 新規ブック Set xlSheet = xlBook.Worksheets(1) ' 新規シートの作成 'エクセルを表示 xlApp.Visible = True ' Excelのセルに値を代入 xlSheet.Cells(1, 1).Value = "プチモンテ" xlSheet.Cells(2, 1).Value = "http://www.petitmonte.com/" ' オブジェクトの解放 ERROR_HANDER: Set xlSheet = Nothing Set xlBook = Nothing Set xlApp = Nothing On Error GoTo 0 End Sub
[結果]
Visual Basicのその他関数
関数名 | 内容 |
---|---|
AddressOf | 関数のアドレスを返す |
CallByName | オブジェクトのプロパティやメソッドを実行する |
CreateObject | ActiveXオブジェクトへの参照を返す |
CurDir | ドライブの現在のパスを返す |
CVErr | ユーザー定義のエラー番号を返す |
Dir | パターンに一致するファイル、フォルダ名を返す |
DoEvents | OSに制御を渡す |
Environ | OSの環境変数を返す |
Error | エラー番号に対応するエラーメッセージを返す |
InputBox | 入力ダイアログを表示する |
LoadPicture | 画像を読み込む |
MsgBox | メッセージボックスを表示する |
RGB | RGB値のコードを返す |
Shell | 外部プログラムを実行する |
TypeName | 変数に関する情報を文字列で返す |
VarType | 変数に関する情報を整数値で返す |
エクセル講座のクイックリンク
スポンサーリンク
関連記事
公開日:2015年07月13日
記事NO:01184