Microsoft KB Archive/65872

From BetaArchive Wiki

Accessing EditSummaryInfo Parameters in Word for Windows

PSS ID Number: Q65872 Article last modified on 11- 4-1991

1.00 1.10 1.10a 2.00 WINDOWS

Summary: The following macro illustrates the proper way to access the information in the Summary Info dialog box in Microsoft Word for Windows versions 1.0, 1.1, and 1.1a. To obtain the value of any field in SummaryInfo you must use GetCurValues to access the information in the dialog box and then assign a string variable to the value of the field desired. The following is an example: Sub MAIN Dim dlg As Dialog EditSummaryInfo GetCurValues dlg A<math display="inline">=dlg.Title B</math>=dlg.Comment C<math display="inline">=dlg.EditTime End Sub To access the information in the File menu's Summary Info command (FileSummaryInfo) in Microsoft Word for Windows 2.00, use the following macro: Sub MAIN Dim dlg As Dialog FileSummaryInfo GetCurValues dlg A</math> = dlg.Title B$ = dlg.Comments C$ = dlg.EditTime End Sub You can change only the text fields in the first dialog box. If the filename (FileName) is not specified, then information for the active document is modified. The document must be open for information to be modified. The macro below illustrates how to modify the editable fields in EditSummaryInfo in Microsoft Word for Windows 1.0, 1.1 and 1.1a: Sub MAIN EditSummaryInfo
.Title = “This is the title”,
.Subject = “editsummaryinfo”,
.Author = “Microsoft”,
.Keyword = “Used to search”,
.Comment = “comments section”,
.FileName = “Example.doc”,
.Update End Sub The following macro illustrates how to modify the editable fields in FileSummary Info in Word for Windows 2.0: Sub MAIN FileSummaryInfo
.Title = “This is the title”,
.Subject = “editsummaryinfo”,
.Author = “Microsoft”,
.Keywords = “used to search”,
.Comments = “comments section”,
.FileName = “Example.doc” End Sub

Reference(s): “Microsoft Word Technical Reference for Windows and OS/2,” page 163 “Microsoft Word Technical Reference for Windows,” page 46

Additional reference words: 1.00 1.10 1.10a 2.00 w4wmacro