在Word文档中嵌入对象并显示为图标？

Question

我有一个word文档。在word文档中我有命令按钮。

我所追求的是当用户按下命令按钮时，它会打开一个对话框，以便用户可以嵌入文件并在word文档中显示为图标。

我如何在VBA中执行此操作？

最终我想要以下内容：

1. 用户点击按钮
2. 对话框打开，供用户选择文件（任何类型）
3. 用户点击确定
4. 文件作为图标
嵌入（未链接）在文档中
5. 如果用户单击取消，则关闭对话框窗口。

Answer 1

好的，这是开始

Option Explicit
Sub AddFileIcon()
    SendKeys "%F{TAB 4} {TAB 5}"
    Dialogs(wdDialogInsertObject).Show
End Sub

现在您创建 Button :-)并调用宏

这是帮助完整的链接

  

VBA SendKeys

  

Word Dialog Boxes