Shapes.AddOLEObject メソッド (Publisher)

OLE オブジェクトを表す新しい Shape オブジェクトを、指定した Shapes コレクションに追加します。

構文

AddOLEObject (left, top, width, height, ClassName, FileName, link)

表現Shapes オブジェクトを表す変数です。

パラメーター

名前 必須 / オプション データ型 説明
Left 必須 バリアント型 (Variant) OLE オブジェクトを表す図形の左端の位置を指定します。
Top 必須 バリアント型 (Variant) OLE オブジェクトを表す図形の上端の位置を指定します。
Width オプション バリアント型 (Variant) OLE オブジェクトを表す図形の幅を指定します。 既定値は -1 で、これは、OLE オブジェクトのデータに基づいて図形の幅が自動的に設定されることを示します。
Height オプション バリアント型 (Variant) OLE オブジェクトを表す図形の高さを指定します。 既定値は -1 です。図形の高さはオブジェクトのデータに基づいて自動的に設定されます。
ClassName 省略可能 String 追加する OLE オブジェクトのクラス名を指定します。
FileName 省略可能 String 追加する OLE オブジェクトのファイル名を指定します。 パスを省略すると、現在作業中のフォルダーが使用されます。
Link 省略可能 MsoTriState OLE オブジェクトを文書にリンクするのか、または埋め込むのかを指定します。

戻り値

Shape

注釈

LeftTopWidth、および Height の各引数の場合、数値はポイント単位で評価されます。文字列は、Microsoft Publisher でサポートされている任意の単位で指定できます (たとえば、"2.5 in")。

ClassName または FileName のいずれかを指定する必要があります。 どちらも指定しないか、または両方を指定した場合は、エラーが発生します。

Link パラメーターには、Microsoft Office タイプ ライブラリで宣言されている MsoTriState 定数のいずれかを指定できます。次の表に示します。

定数 説明
msoFalse OLE オブジェクトは埋め込まれます。
msoTrue OLE オブジェクトはリンクされています。 既定値です。

次の使用例は、作業中の文書の先頭ページに Microsoft Office の Excel ワークシートを追加し、編集できるようにワークシートをアクティブにします。

Dim shpSheet As Shape 
 
Set shpSheet = ActiveDocument.Pages(1).Shapes.AddOLEObject _ 
 (Left:=72, Top:=72, ClassName:="Excel.Sheet") 
 
shpSheet.OLEFormat.Activate

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。