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

时间:2015-06-15 05:24:15

标签: vba ms-word word-vba word-2010

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

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

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

最终我想要以下内容:

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

1 个答案:

答案 0 :(得分:2)

好的,这是开始

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

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

这是帮助完整的链接

  

VBA SendKeys


  

Word Dialog Boxes