文本框中的VBA空白行导致错误

如果某人在Word 2016 64位中的VBA中的文本框中输入了输入，如果它们在文本框的末尾输入空行，则该程序崩溃并抛出此错误。我无法弄清楚如何解决这个问题，不知道该怎么尝试。文本框中的VBA空白行导致错误

文本框：

代码：

Set ccs = ActiveDocument.SelectContentControlsByTag("CreditNotes") 
Set cc = ccs(1) 
cc.Range.Text = CreditNotes.Text'

我再拿到5844错误，但只要有一个空行末的文本框。否则，它的作品。

我应该使用什么代码来自动取出空白行，这样不会丢出错误？

2017-08-10 James

是否有与生成文本关联的任何代码？ – Cyril

不是。它不是。 – James

https://stackoverflow.com/questions/10024402/how-to-remove-line-break-in-string应该可以帮助你正确的方向。 – Sorceri

您可以试试：

cc.Range.Text = Replace(CreditNotes.Text, vbCrLf, vbNullString)

2017-08-10 16:50:11

回答