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

我为我的问题提前道歉，到目前为止，我与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文件中的所有数据

---

你们能帮我一下吗？

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