Shapes.AddOLEObject メソッド (Excel)
OLE オブジェクトを作成します。 新しい OLE オブジェクトを表す Shape オブジェクトを返します。
構文
式。AddOLEObject (ClassType、 FileName、 Link、 DisplayAsIcon、 IconFileName、 IconIndex、 IconLabel、 Left、 Top、 Width、 Height)
表現Shapes オブジェクトを表す変数です。
パラメーター
名前 | 必須 / オプション | データ型 | 説明 |
---|---|---|---|
ClassType | 省略可能 | バリアント型 | オブジェクトを作成するためのプログラム ID を含む文字列を指定します。 ClassType または FileName を指定する必要があります。 ClassType が指定されている場合、FileName と Link は無視されます。 |
FileName | 省略可能 | バリアント型 (Variant) | オブジェクトの作成元ファイルを指定します。 パスを指定しない場合は、現在の作業フォルダーが使用されます。 オブジェクトの ClassType 引数または FileName 引数を指定する必要がありますが、両方を指定することはできません。 |
Link | 省略可能 | バリアント型 (Variant) | True の 作成元ファイルに OLE オブジェクトをリンクします。 False を指定 するには、OLE オブジェクトは、ファイルの独立したコピーです。 ClassType に値を指定した場合、この引数は False である必要があります。 既定値は False です。 |
DisplayAsIcon | 省略可能 | バリアント型 (Variant) | True を設定すると、OLE オブジェクトをアイコンで表示します。 既定値は False です。 |
IconFileName | 省略可能 | バリアント型 (Variant) | 表示するアイコンを含むファイルを指定します。 |
IconIndex | 省略可能 | バリアント型 | IconFileName 内のアイコンのインデックス。 指定したファイルのアイコンの順序は、[アイコンの変更] ダイアログ ボックス ([オブジェクトの挿入] ダイアログ ボックスで [アイコンで表示] チェック ボックスをオンにして表示) に表示されるアイコンの順序と同じです。 ファイルの最初のアイコンは、インデックス番号が 0 となります。 指定したインデックス番号が引数 IconFileName のファイルに存在しない場合、インデックス番号 1 (ファイルの 2 番目のアイコン) のアイコンが使用されます。 既定値は 0 です。 |
IconLabel | 省略可能 | バリアント型 (Variant) | アイコンの下に表示するラベル (標題) を指定します。 |
Left | 省略可能 | バリアント型 | ドキュメントの左上隅を基準とした、新しいオブジェクトの左上隅の位置 ( ポイント単位)。 既定値は 0 (ゼロ) です。 |
Top | 省略可能 | バリアント型 | ドキュメントの上部を基準とした、新しいオブジェクトの左上隅の位置 (ポイント単位)。 既定値は 0 (ゼロ) です。 |
Width | オプション | バリアント型 (Variant) | OLE オブジェクトの初期サイズをポイント単位で指定します。 |
Height | オプション | バリアント型 (Variant) | OLE オブジェクトの初期サイズをポイント単位で指定します。 |
戻り値
図形
例
次の使用例は、myDocument にリンクが設定された Word 文書を追加します。
Set myDocument = Worksheets(1)
myDocument.Shapes.AddOLEObject Left:=100, Top:=100, _
Width:=200, Height:=300, _
FileName:="c:\my documents\testing.doc", link:=True
次の使用例は、myDocument に新しいコマンド ボタンを追加します。
Set myDocument = Worksheets(1)
myDocument.Shapes.AddOLEObject Left:=100, Top:=100, _
Width:=100, Height:=200, _
ClassType:="Forms.CommandButton.1"
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。