如何複製表格中的文本單元格然後查找和替換字符串保持格式化

Question

我正在寫一些VBA代碼在MS Word文檔中。

我在文檔中創建了一個表，它是多行兩列。

第一列包含一個標題，如「歡迎信」，並在表的第二列包含郵件正文「親愛的[客戶]，我們歡迎您到我們公司......」

我希望能夠創建一個按鈕或某種形式的表單來複制column2的內容，用我可能創建的變量替換[client]，即Dim clientname ='Bob'，然後將消息放入剪貼板中粘貼到電子郵件中。

模板也具有豐富的文本格式，因此需要維護。我已經玩過一段時間了，但是我無法保留豐富的文本格式，只要替換格式丟失的東西即可。

任何人有任何想法如何實現這一目標？一位同事建議我應該在後臺創建一個新的word文檔，並將其用於替換。我跺腳，並聽取您的建議。乾杯！

Answer 1

您可以使用名稱的formfield和簡單地使用它訪問的文本是DOM對象是這樣的：

ThisDocument.Formfields("name of formfield").Result 

在這裏，您可以將文本保存到一個變量或隨意替換的文字。我認爲它會保留格式，但如果不是，那麼您可以研究使用內容控件將文檔的一部分設置爲富文本區域。這裏的信息：

http://msdn.microsoft.com/en-us/library/office/ff836891(v=office.15).aspx

我希望這有助於。