Пример обращения к значению переменной и данным таблицы в отчетеВ шаблоне отчета «Дневная загрузка ресурса (субъекты)» демонстрационной базы данных можно посмотреть пример использования макроса для расчета суммы и вывода ее в таблицу. Отчет находится в справочнике «Отчеты объектов», в папке «Шаблоны отчетов/ФСА». Текст макроса, выполняемого после выполнения самого отчета, представлен ниже: Sub ПослеВыполненияОтчета(ob As Variant, app As Variant) a = CDbl(Application.ActiveDocument.Variables("СтавкаВЧас").Value) Set T = Application.ActiveDocument.Bookmarks("ДействияСтоимостьРесурсаИРоли").Range.Tables(1) kol = T.Rows.Count For i = 2 To kol - 1 Stroka = T.Cell(i, 8).Range.Text l = Len(Stroka) If l > 1 Then d = CDbl(Left(Stroka, l - 1)) 'убрать последний символ ячейки T.Cell(i, 9).Range.Text = CStr(d * a) End If Next i T.Cell(kol, 9).AutoSum End Sub Можно получить значение переменной шаблона, обозначаемой DOCVARIABLE, по имени: Application.ActiveDocument.Variables("<СистемноеНазваниеПривязки>").Value, где <СистемноеНазваниеПривязки> − это название привязки, которое отображается в дереве привязок на конечной странице мастера (см. п. 12.2.1). Таким образом получены данные привязки с типом «Объект». В макросе примера так получено значение привязки «СтавкаВЧас» для дальнейшего использования. Можно получить значение закладки шаблона, по имени: Application.ActiveDocument.Bookmarks("<СистемноеНазваниеПривязки>").Range.Tables(1), где <СистемноеНазваниеПривязки> − это название привязки, которое отображается в дереве привязок на конечной странице мастера (см. п. 12.2.1). Таким образом можно получить данные привязки с типом «Список», «Фильтр», «Дерево». В макросе примера получена таблица «ДействияСтоимостьРесурсаИРоли», и далее ведется работа с данными таблицы.
|
