指定された OLE オブジェクトを開き、その OLE オブジェクトが作成されたアプリケーションで編集できるようにします。
構文
式。編集
expression 必須です。 'Comment' オブジェクトを表す変数。
例
次の使用例は、作業中の文書で、図形として定義された最初の埋め込みの OLE オブジェクトを開き、編集できるようにします。
Dim shapesAll As Shapes
Set shapesAll = ActiveDocument.Shapes
If shapesAll.Count >= 1 Then
If shapesAll(1).Type = msoEmbeddedOLEObject Then
shapesAll(1).OLEFormat.Edit
End If
End If
次の使用例は、作業中の文書で、位置を固定した図形として定義された最初のリンクされた OLE オブジェクトを開き、編集できるようにします。
Dim colIS As InlineShapes
Set colIS = ActiveDocument.InlineShapes
If colIS.Count >= 1 Then
If colIS(1).Type = wdInlineShapeLinkedOLEObject Then
colIS(1).OLEFormat.Edit
End If
End If
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。