将单个Excel电子表格中的数据导出到多个单词模板中

时间:2016-11-28 11:04:35

标签: excel vba excel-vba templates ms-word

道歉,如果答案在那里,我看不出任何具体到我要问的东西,真的只需要知道这是否可能,以及在进一步做之前这样做的最佳方法。

我有一张电子表格,其中包含许多包含文字的字段。这些都需要转移到不同的单词模板(总共10个模板),工作表还包含列,这些列指示每个项目在每个模板中的位置。 (有些会转到多个模板)

最终目标是自动化从电子表格中生成模板的过程。

到目前为止,我最初的想法是:

  

使用邮件合并功能(我从未这样做过,因此必须对此进行研究)

     

使用VBA脚本

对于我想做的事情,这些都是可行的吗? (我想我可以轻松创建一个宏来安排excel中的数据,我真正的问题是自动进入正确的单词模板)

如果它们都可行,哪个更容易?

对不起,如果这不是很清楚,我只是希望在向前推进之前得到明智的印象。

由于

1 个答案:

答案 0 :(得分:0)

邮件合并当然应该为你做。如果你想使用DocVariables,你也可以这样做。这是一个供您试用的示例脚本。

Sub PushToWord()

Dim objWord As New Word.Application
Dim doc As Word.Document
Dim bkmk As Word.Bookmark
sWdFileName = Application.GetOpenFilename(, , , , False)
Set doc = objWord.Documents.Open(sWdFileName)

objWord.activedocument.variables("FirstName").Value = Range("FirstName").Value
objWord.activedocument.variables("LastName").Value = Range("LastName").Value

ActiveDocument.Fields.Update

objWord.Visible = True

End Sub