vba - VBAを使用してWord文書のテーブルの特定のセルにオブジェクトを埋め込む

Question

今のところ、私はこのコードを介してのみドキュメントを埋め込むことができます：

Dim wordDoc as word.document
wordDoc.InlineShapes.AddOLEObject Filename:="C:/Doc.doc", Linktofile:=False, DisplayAsIcon:=True, IconLabel:="Sample"

問題は、オブジェクトをテーブル内の特定のセルに埋め込みたいということです。何が起こっているのかというと、最初のセルにのみ挿入されます。I; v検索しようとしましたが、運がありませんでした。私はVBAの初心者なので、助けてください。ありがとう。:)

Answer 1

次のようになります。

ActiveDocument.Tables(1).Columns(2).Cells(2).Range.InlineShapes.AddOLEObject Filename:="C:/Doc.doc", Linktofile:=False, DisplayAsIcon:=True, IconLabel:="Sample"