使用VB.NET更新MS Word文档

使用VB.NET更新MS Word文档,vb.net,ms-word,Vb.net,Ms Word,我有一个Word 2013文档(.docx),其中的值需要替换。我可以找到大量代码,但无法使其工作,因为导入word.application无法工作 我的表单有一个文本框来指定word文档的文件名,还有一个文本框供用户输入值(tbCRMID)。执行后,我需要word文档中的值(替换为tbCRMID.text) 我还有很多其他的替代品要做,但一旦我有一个能工作,我就应该准备好了 这是我的密码: Try Dim NewOutputFile As String Dim newApp

我有一个Word 2013文档(.docx),其中的值需要替换。我可以找到大量代码,但无法使其工作,因为导入word.application无法工作

我的表单有一个文本框来指定word文档的文件名,还有一个文本框供用户输入值(tbCRMID)。执行后,我需要word文档中的值(替换为tbCRMID.text)

我还有很多其他的替代品要做,但一旦我有一个能工作,我就应该准备好了

这是我的密码:

Try 
    Dim NewOutputFile As String 
    Dim newApp As Object 
    Dim newDoc As Object 
    newApp = CreateObject("Word.Applicatoin") 
    newApp.visible = True 
Catch ex As Exception 
    MsgBox(ex.Message) 
End Try

此代码生成错误
“无法创建活动X控件”

您拼错了
Word.Application
。此外,考虑向微软Word对象库添加引用,然后可以使用强类型和智能感知:

Dim newApp As New Word.Application
newApp.Visible=True
Dim newDoc = newApp.Documents.Add
有关一些好的起点,请参见和


我还请您参考我的答案(这是针对python的,但原则是相同的)。

下面的代码生成了一个关于“无法创建活动X控件”的错误。尝试成功打开程序,然后我将添加要打开的文档,然后使用查找/替换函数。尝试Dim NewOutputFile作为字符串Dim newApp作为对象Dim newDoc作为对象newApp=CreateObject(“Word.applicationin”)newApp.visible=True Catch ex作为异常MsgBox(ex.Message)End tryp在上述问题中提取代码-编辑它。然后您可以格式化代码块。@GeorgeVaisey-您是如何添加对
Microsoft Word
库的引用的?@KarlAnderson OP不需要添加对Word的引用;他在使用
CreateObject
@ZevSpitz-什么?OP需要引用Microsoft Word对象库,就像您在回答中所说的那样!谢谢你的帮助。拼写错误的单词和实现库是不正确的。我现在可以成功打开文档了。现在转到我的搜索和替换函数…:)