WD97: Squares Appear in Text Form Field Inserted from User Form

This article was previously published under Q192161
This article has been archived. It is offered "as is" and will no longer be updated.
When you insert data from a text box on a user form into a Microsoft Worddocument text form field, square characters appear and are printed in thedocument.
When you press ENTER to begin a new line in a text box on a user form withthe MultiLine and EnterKeyBehavior properties set to True, a squarecharacter is used to represent the carriage return character (CHR(10)).This character is not visible if the text is displayed in a message box orinserted into the document itself.
Do not use a text box on a user form with the MultiLine property set toTrue to get a Microsoft Word document form field result (value or text).
Microsoft provides programming examples for illustration only, without warranty either expressed or implied. This includes, but is not limited to, the implied warranties of merchantability or fitness for a particular purpose. This article assumes that you are familiar with the programming language that is being demonstrated and with the tools that are used to create and to debug procedures. Microsoft support engineers can help explain the functionality of a particular procedure, but they will not modify these examples to provide added functionality or construct procedures to meet your specific requirements. The following Visual Basic for Applications macro uses the InStr functionto take the carriage return character (Chr(10)) out of the text stringbefore inserting it into a text form field.

The following code is assigned to a command button on the user form.

Private Sub CommandButton1_Click()ActiveDocument.FormFields("text1").Result = CleanString(TextBox1.Text)UserForm1.HideEnd Sub				
For additional information, please see the following article in theMicrosoft Knowledge Base:
173707 OFF97: How to Run Sample Code from Knowledge Base Articles
wordcon kbimu

Article ID: 192161 - Last Review: 10/10/2013 20:50:26 - Revision: 2.1

  • Microsoft Word 97 Standard Edition
  • kbnosurvey kbarchive kbmacroexample kbnofix kbprb KB192161