Постановка задачи

Необходимо создать новый документ Microsoft Word и ввести две строки текста, одну из которых нужно отформатировать стилем «Заголовок 2; Раздел», а вторую выделить серым цветом. Созданный документ должен отобразиться пользователю – он сможет его сохранить или отказаться от сохранения.

Программный код

 

// Создать объект приложения Microsoft Word.

WordApp = CreateObject("Word.Application")

// Создать новый документ.

NewDoc = WordApp.Documents.Add()

// Добавить в него текстовую строку.

Selection = WordApp.Selection

Selection.TypeText("Новый документ для редактирования")

// Отформатировать строку стилем "Заголовок 2,Раздел".

Selection.Paragraphs(1).Style = NewDoc.Styles("Заголовок 2;Раздел")

// Добавить новую строку.

Selection.TypeParagraph

Selection.TypeText("Документ создан в тексте вычислений на языке ISBL")

// Выделить введенный текст серым цветом.

wdColorGray20 = 13421772  //это значение используется для серого цвета 20%

Selection.ParagraphFormat.Shading.BackgroundPatternColor =  wdColorGray20

// Отобразить созданный документ пользователю.

WordApp.Visible = True

Результат

Отобразится новый документ Microsoft Word с отформатированными строками:

© 2016 Компания DIRECTUM

Сообщество пользователей DIRECTUM