如何将Word文档中的文本框值复制到使用VBA的不同Word文档中的文本框中（MS Word 2003）

Question

希望这是一个简单的问题。

我有两个word文档（MS Word 2003），每个文档都有一个文本框对象。在按下命令按钮时，我希望文档中的文本（“Reference_Text.docx”）位于另一个文档的文本框中。

下面显示了我尝试在按下命令按钮时使用的代码。我正在尝试使文本框（txtLocation_Analysis）填充到位于Reference_Text.docx文件中的“txtLocation_Analysis_1”中的文本。

Dim objWord As Word.Application 
Dim wd As Word.Document 
Set wd = objWord.Documents.Open("C:\Users\Tim\Desktop\Reference_Text.docx") 

ThisDocument.txtLocation_Analysis.Text = '(Want to call a "txtLocation_Analysis_1.text" from wd document) 

让我知道，如果这是有道理的 - 如果可以提供任何帮助，请:)

休

Answer 1

你尝试

ThisDocument.txtLocation_Analysis.Text = "txtLocation_Analysis_1.text" ' A 

或

ThisDocument.txtLocation_Analysis.Text = wd.txtLocation_Analysis_1.Text ' B 

对不起，从t他的措辞仍然不清楚，但我认为你想要（A）字符串“txtLocation_Analysis_1.text”或（B）您打开的文档中的另一个文本框的内容出现在ThisDocument的文本框中。