VBA - 使用 CSV 表值填充 Word 文档答案

【问题标题】：VBA - Populate Word document with CSV table valuesVBA - 使用 CSV 表值填充 Word 文档
【发布时间】：2015-11-19 02:20:14
【问题描述】：

我为我的问题提前道歉，到目前为止，我对 MsWord 宏的了解并不多。

到目前为止，我执行了以下脚本，通过 VBA Word 宏将一些格式良好的表格逐一添加到 Word 文档中：

Sub InsertTableToWord()    

Dim TCID As String, TCTitle As String, TCObjective As String

TCID = InputBox("Provide TCID: ")
TCTitle = InputBox("Provide TCTitle: ")
TCObjective = InputBox("Provide TCObjective: ")

' some code to format the entered data
Selection.TypeText Text:=TCID
Selection.TypeText Text:=TCTitle
Selection.TypeText Text:=TCObjective

End Sub

对于不同的 TC* 值，我必须执行上述宏 10 到 40 次。

我现在想做的事：

将 TC* 值存储在 CSV 中（完成，第一列 TCID，第二列 - TCTitle，第三列 - TCObjective）
修改我的代码以加载存储在 CSV 文件中的值并重复该操作，直到使用 CSV 文件中的所有数据。

你们能帮我解决这个问题吗？

【问题讨论】：

标签： vba csv ms-word

【解决方案1】：

最有效的方法是使用 Range.InsertFile 将 CSV 文件导入到文档中，然后使用 Range.ConvertToTable 方法将其转换为 Word 表格。您将在本文中找到讨论和详细的代码示例：

https://msdn.microsoft.com/en-us/library/aa537149%28v=office.11%29.aspx?f=255&MSPPError=-2147217396

【讨论】：