Microsoft KB Archive/110014

From BetaArchive Wiki

Article ID: 110014

Article Last Modified on 8/16/2005



APPLIES TO

  • Microsoft Word 6.0 Standard Edition
  • Microsoft Word 6.0a
  • Microsoft Word 6.0c
  • Microsoft Word 95 Standard Edition
  • Microsoft Word 95a
  • Microsoft Word 98 for Macintosh
  • Microsoft Word 6.0 for Macintosh
  • Microsoft Word 6.01 for Macintosh
  • Microsoft Word 6.01 for Macintosh



This article was previously published under Q110014


SYMPTOMS

Calculation text fields within forms are not updated automatically.

RESOLUTION

Word 98 Macintosh Edition

Use the Calculate On Exit option located in the Text Form Field Options dialog box. (To display this dialog box, click a form field, and click the Form Field Options button on the Forms toolbar.)

Word 6.x and 7.x

WARNING: ANY USE BY YOU OF THE CODE PROVIDED IN THIS ARTICLE IS AT YOUR OWN RISK. Microsoft provides this macro code 'as is' without warranty of any kind, either express or implied, including but not limited to the implied warranties of merchantability and/or fitness for a particular purpose.

You cannot manually update a FORM field in these versions of Word. To update text fields which are defined as calculation fields, create a macro using the following steps:

  1. Create the following macro:

          Sub Main
             SetFormResult "text1"
          End Sub
                            

    where "text1" represents the bookmark name used in the calculation form field.

    NOTE: If a bookmark in a calculation field expression contains a number, such as Q1 or UP1, the field will not update. For a calculation field to update correctly, make sure the bookmark name does not contain numbers.

  2. Modify the form field options for the form field that you will exit before you enter the calculation form field. In the Text Form Field Options dialog box, under Run Macro On Exit, select the macro you created in step 1 and then click OK.


MORE INFORMATION

The following is a quick macro that serves as a generic for forms. It can be used in place of the macro shown in the Resolution section above.

   Sub MAIN
      For count = 1 To CountBookmarks()
         On Error Resume Next
         SetFormResult BookmarkName$(count)
         Err = 0
      Next
   End Sub
                

This macro attempts to update all bookmarks in the document. Calculation fields must have a bookmark (while other fields do not). If a bookmark resides within the protected document, an error occurs (which is caught by the third line of the sample above, and skipped).

This macro will give the impression of on-the-fly updating if it is added to each field; however, this will work slowly if your document contains a large number of calculation fields. If you need to update individual fields, use the SetFormResult command followed by the calculation field bookmark.


Additional query words: update updating field fields form forms bookmarks formfield

Keywords: kbmacro kbualink97 kbprogramming kbprb kbdtacode KB110014