VBA Blank Line In TextBox Causes Error

Question

When having someone enter an input in a TextBox in VBA in Word 2016 64bit if they enter a blank line at the end of the textbox the program crashes and throws this error out. I can not figure out how to fix this and do not know what to try.

TextBox:

Code:

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

I then get the 5844 error but only if there is a blank line at the end of the textbox. Otherwise it works.

What code should I use to automatically take out the blank line so this will not throw out an error?

https://stackoverflow.com/questions/10024402/how-to-remove-line-break-in-string should help you int he right direction. — Sorceri, Aug 10 '17 at 16:57

K Paul · Accepted Answer · 2017-08-10T17:40:27.557

2

You might try:

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

edited Aug 10 '17 at 17:40

answered Aug 10 '17 at 16:50

K Paul

134
10

VBA Blank Line In TextBox Causes Error

1 Answers1